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Leve um computador pessoal da Prológica 
e ganhe grátis algumas horas a mais por dia. 



O CP 500 
da Prológica põe 
a informática ao 
alcance dos executivos, 
profissionais liberais, 
estudantes e da família. 

Ele é um microcomputador 
de custo acessível e com a 
capacidade equivalente à dos 
grandes computadores de ontem 
Você não imagina a variedade de 
tarefas gue ele pode executar. 

E além de economizar o seu tempo, 
o CP 500 tem uma outra vantagem: 
ele não erra. 

Errar é humano e esse direito não foi dado 
ao computador. 


Características Técnicas 

• CPU: Microprocessador Z80 

• Memória: 48 Kb RAM. 16K b ROM 

• Vídeo 12” 16 linhas x 64 ou 32 col. 


forme-se na Prológica ou 
um de seus revendedores 
as infinitas utilidades 
CP 500. 

E peça uma demonstração do 
PROCALC, um programa desenvolvido 
pela Prológica para o CP 500 fornecer 
informações gerenciais tais como: projeção 
de vendas, análise financeira, fluxo de 
caixa, controle de projetos e até 
planejamento de despesas domésticas, etc. 



• Teclados alfanumérico e numérico 
reduzidos com um total de 65 teclas 

• Até 2 unidades de discos flexíveis 
de 5 1/4" no próprio gabinete, com 
expansão de mais 2 unidades externas 

• Interface paralela, acessório opcional: 
Serial - RS 232 C 

• Basic nível 111 • Som 
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EDITORIAL 




Geração Prológica é uma revista voltada fundamen¬ 
talmente à veiculação de software e dicas de hardware 
para o CP 200 , CP 300 e CP 500 , com o objetivo de tor¬ 
ná-los efetivamente ferramentas úteis e criativas no dia- 
a-dia e horas de lazer. 

Neste segundo número de nossa revista , além de pu¬ 
blicarmos vários jogos e utilitários , estamos veiculando 
um encarte especial contendo a relação de várias softwa- 
re-houses (casas de software) que desenvolvem progra¬ 
mas para a família dos CPs. Em última análise , esta re¬ 
lação poderá orientar os usuários na hora de comprar 
um aplicativo. 

Ainda dentro da área de software , criamos uma seção 
que visa a enfocar , a cada número de nossa revista , uma 
software-house em especial. Estamos também iniciando , 
através da matéria de capa deste número , uma seção que 
se destina à publicação de programas aplicáveis à educa¬ 
ção. Isto porque acreditamos , juntamente com pedago¬ 
gos e psicólogos , que o computador é uma ferramenta de 
ensino útil , no lar ou na escola. Ferramenta criada não 
para substituir o professor , mas para auxiliá-lo em sua 
tarefa de introduzir crianças e jovens na sociedade mo¬ 
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derna , onde os recursos computarizados são uma cons¬ 
tante , não uma exceção. 

Mas como Geração Prológica não se volta unica¬ 
mente ao software , para atender à área de hardware 
também criamos uma nova seção: Conhecendo os CPs . 
Nesse espaço , detalharemos os aspectos técnicos dos 
Computadores Pessoais Prológica , esclarecendo muitos 
recursos que às vezes causam dúvidas ou são desconheci¬ 
dos por nossos usuários. Neste número , abordamos a 
porta de 1/0 (entrada e saída), do CP 500. 

Finalmente , gostaríamos de comunicar a nossos leito¬ 
res o quanto nos sentimos gratificados com o volume de 
correspondências enviadas à revista , permitindo o retor¬ 
no esperado. Avisamos também que , para atender a to¬ 
dos os pedidos de revistas , elaboramos um cartão de as¬ 
sinaturas e duplicamos nossa tiragem: de cinco mil para 
dez mil exemplares. Já que Geração Prológica defi- 
niu-se como uma publicação bimensal , esperamos em fe¬ 
vereiro poder novamente aumentar nossa tiragem , con¬ 
tando sempre com a atenção e colaboração de todos. 

Carlos Roberto A . Gauch 
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Carias 


A partir deste número de Gera¬ 
ção Prológica , todos os pedidos de 
revistas nos devem ser enviados 
através do Cartão de Assinaturas, 
que estamos veiculando. Todos os 
leitores que nos escreverem antes 
do cartão automaticamente estão 
incluídos em nossa lista de assi¬ 
nantes. 


Na última Feira de Informática 
realizada recentemente, em São Pau¬ 
lo, entrei em contato com as novida¬ 
des produzidas pela Prológica, as 
quais pretendo implementar de ma¬ 
neira gradativa no meu CP 300, ad¬ 
quirido no início de agosto. 

Neste mesmo evento, constatei o 
lançamento da revista Geração Proló¬ 
gica , iniciativa ímpar da empresa, que 
veio sanar uma séria deficiência edito¬ 
rial para os usuários de micros, espe¬ 
cialmente pelo seu conteúdo. Desta 
maneira, gostaria de ter o meu nome 
incluído entre os que irão receber re¬ 
gularmente esta publicação. 

Além disso, também gostaria de re¬ 
ceber informações de como me tornar 
colaborador de Geração Prológica. 
Atualmente, venho utilizando o meu 
CP 300 em atividades profissionais — 
especialmente em cálculos numéricos 
e estatísticas — e na recreação da fa¬ 
mília, através de jogos. Pretendo, ain¬ 
da, utilizar o meu micro no ensino de 
química, desenvolvendo software 
apropriado. Atualmente pertenço ao 
quadro de docentes do Instituto de 
Química da Universidade Estadual 
Paulista “Júlio de Mesquita Filho”, 
localizado em Araraquara. 

João Olimpo Tognolli 
Araraquara - SP 

Prezado João O. Tognolli, o seu no¬ 
me já está incluído em nossa lista de 
assinantes, sendo que a partir de ago¬ 
ra você passará a receber regularmen¬ 
te a revista Geração Prológica. Para 
que suas colaborações cheguem até 
nós basta remetê-las à Prológica Mi¬ 
crocomputadores, A/C Rita de Cassia 
Sbragia, av. Eng? Luis Carlos Berri- 
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ni, 1168, 5? andar, CEP 04571, São 
Paulo. 

Muito oportuna a chegada de Gera¬ 
ção Prológica , para todos os usuários 
da linha CP. Parabéns e todos os vo¬ 
tos de muito sucesso. Como usuário 
de um CP 300, há dois meses, tenho 
muito interesse em receber a revista 
Geração Prológica. Favor informar o 
que fazer, com rapidez, pois não pre¬ 
tendo perder nenhum número. 

Também aproveito esta carta para 
fazer uma consulta: tenho dificuldade 
em fazer CSAVE e CLOAD de pro¬ 
gramas, quando uso CASS A. E vir¬ 
tualmente impossível fazer o mesmo 
em CASS B. Não há referências sobre 
isto no manual, por isso, gostaria de 
esclarecimentos. Além disso, também 
gostaria de saber como iniciar-me no 
Assembler Z80. 

José Luis L. da Silva 
São Paulo, SP 

Caro José Luiz, você não perderá 
nenhum número da Geração Prológi¬ 
ca. Regularmente ela será enviada a 
você. Quanto à sua dificuldade em 
usar os comandos CLOAD e CSAVE, 
podemos lhe ajudar no seguinte: 
quando você for ler uma fita que não 
foi gravada no seu próprio gravador, 
você sempre terá dificuldade. A única 
solução possível é pelo método de ten¬ 
tativas, fazendo ajustes de volumes de 
leitura. Se o seu gravador for um Na¬ 
tional 2222, faça um pequeno furo no 
painel superior para poder ajustar o 
azimute da cabeça de leitura usando 
uma chave Philips pequena. 

Quando você for gravar uma fita, 
seja em velocidade A ou B, procure 
sempre usar uma fita de boa qualida¬ 
de (Scotch, por exemplo) e não se es¬ 
queça de posicioná-la no início da par¬ 
te magnética, antes de digitar CSAVE 
“X” e pressionar ENTER. Após a 
gravação, rebobine a fita e usando o 
comando CLOAD ? confira a sua gra¬ 
vação. Se isto não solucionar o seu 
problema, escreva-nos novamente 
dando detalhes do tipo e modelo de 
seu gravador. 


Quanto à sua última pergunta, su¬ 
gerimos que você procure a Fundação 
Alvares Penteado, no Largo São 
Francisco, 39, onde são ministrados 
cursos de Assembler. 

Durante a III Feira Internacional 
de Informática, consegui o primeiro 
número da nossa revista. Gostei muito 
e desejo saber como fazer para recebê- 
la mensalmente, pois creio que Gera¬ 
ção Prológica não circulará em bancas 
de jornal. Por favor, não me deixem 
perder o número dois. 

Possuo um CP 200, adquirido em 
setembro. Em apenas 45 dias, gravei 
mais de 15 programas (de livros que 
comprei) e, juntamente com um cole¬ 
ga, já cheguei inclusive a criar dois 
programas: Resolução de Equações 
de 2? Grau e Reflexo, um jogo inicial¬ 
mente desenvolvido numa TI-59, da 
Texas. 

Sotero Luiz da Silva 
Cubatão - SP 

Prezado Sotero, de dois em dois 
meses você estará recebendo a nossa 
revista , já que Geração Prológica é bi¬ 
mensal. Se você desejar que nós publi¬ 
quemos algum programa que você de¬ 
senvolveu, é só remetê-lo à revista, 
acompanhado de um breve currículo. 

Desejo receber regularmente a re¬ 
vista Geração Prológica. Ganhei um 
exemplar da n? 1 na ENTEL, aqui 
em Florianópolis. Além dos progra¬ 
mas, ela traz alguns artigos interes¬ 
santes. Gostei da revista. 

José Luis Gonçalves dos Santos 
Florianópolis - SC 

Sou possuidor de um computa¬ 
dor CP 200 e gostaria de me tornar 
assinante da revista Geração Prológi¬ 
ca. 

Aurélio M. da Silva 

Rio de Janeiro - RJ 

Pedidos anotados. 



Finanças 


- José Nicolau Pompeo 

Modelo CP 200 
16k RAM 
Basic Residente 


Tornar atraente a remuneração do 
capital financeiro num contexto infla¬ 
cionário, via financiamento do consu¬ 
mo de bens duráveis , tem sido uma 
preocupação constante das Financei¬ 
ras ligadas aos grandes magazines da 
cidade de São Paulo, e outras grandes 
cidades brasileiras. 

O estreitamento da renda da classe 
média, consumidora desses bens, tem 
levado esses magazines a efetuarem 
vendas a prazo “sem acréscimo”, ou 
mesmo a conceder uma certa carência 
para o pagamento do Valor Financia¬ 
do. Temos visto comumente propa¬ 
gandas do tipo: “Compre hoje e só co¬ 
mece a pagar em janeiro de 1984”. 

Em função disso vamos, neste nú¬ 
mero de Geração Prológica, confec¬ 
cionar uma Tabela que atenda a essa 
política de vendas (a prazo, com ca¬ 
rência) construindo coeficientes de fi¬ 
nanciamento por unidade de capital 
financeiro , no sentido de facilitar o 
trabalho do vendedor no cálculo do 
valor das prestações. 

Esses coeficientes serão aplicados 
sobre cada unidade do capital finan¬ 
ciado, correspondendo no caso a uma 
taxa dada de 12% ao mês e uma ca¬ 
rência de 3 meses para se efetuar o pa¬ 
gamento da primeira prestação. 

E impoHante que você, dispondo 
de um computador pessoal da Proló¬ 
gica, possa calcular esses coeficientes 
para a taxa que desejar e o prazo de 
carência que lhe aprouver, conside¬ 
rando para isso o fator concorrência. 


José Nicolau Pompeo é professor de Ma¬ 
temática Financeira Aplicada, na Univer¬ 
sidade de São Paulo e na Universidade Ca¬ 
tólica de São Paulo, além de profes¬ 
sor/consultor do programa “Qual é o Gri¬ 
lo?”, da Fundação Padre Anchieta, RTC, 
canal 2. 



Sabemos que na amortização de um 
empréstimo (Valor Financiado) os ju¬ 
ros crescem em progressão geométri¬ 
ca, e através da Matemática Financei¬ 
ra somos conduzidos â seguinte fór¬ 
mula, para o cálculo do valor das 
prestações ditas postecipadas (é o caso 
da compra ter sido efetuada hoje e o 
vencimento da primeira parcela ocor¬ 
rer, por exemplo, depois de um mês). 



onde: R representa o valor das presta¬ 
ções; 

P representa o valor Financia¬ 
do; 


i representa a taxa mensal con¬ 
siderada (isso se as prestações 
forem mensais); 
n representa o número de pres¬ 
tações. 

No caso de uma carência de k me¬ 
ses, teríamos a seguinte fórmula mate¬ 
mática: 


R-P.0 + 4r) k .'—"P— 


100 


I ,n 

1+ lõõ 


sendo a expressão: 


Í1 1 ) n 1 

,, i ,k + 100 ' 100 

11+ w’ ■-^- 


( 1 + W ,n - - 1 
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FINANÇAS 


VALOR DA COMPRA = Cr$ 200.000,00 
Plano Escolhido = 10 prestações 

Coeficiente para 10 prestações e carência de 3 meses = 0,24865001 
VALOR DA VENDA x coeficiente = 200.000,00 x 0,24865001 
VALOR DA PRESTAÇÃO = CrS 49.730,00 


Número de 
Prestações 


Carência 


Coeficientes 


Exemplo: 


04 

3 meses 

0,46255068 

05 

3 meses 

0,3897407 

06 

3 meses 

0,34171462 

07 

3 meses 

0,30784464 

08 

3 meses 

0,26367533 

09 

3 meses 

0,24865001 

10 

3 meses 

0,23661152 

11 

3 meses 

0,22680709 

12 

3 meses 



10 CLS 

20 PRINT RT 0*2;"CRLCULO DE COEFIC 
IENTE POR" 

30 PRINT"UNIDRDE DE CRPITRL FINRNC 
IflDO" 

35 PRINT ,, ==================== : ===== 

40 PRINT RT 5*0?"TX.JUROS MENSAIS* 

50 f INPUI I 
60 PRINT I 

70 PRINT RT 7*0?"PERÍODO CARÊNCIA* 

80 F INPUT K 
90 PRINT K 

100 PRINT RT 9*0? "NR . PRESTAÇÕES 

110 INPUT N 
120 PRINT N 

130 LET COEF=(1+<I/100))##K*<< l + < I 
/100))**N#<1/100))/<(l+<1/100))**N 
- 1 ) 

1M0 PRINT RT 11*0?"COEFICIENTE 
= "?COEF 

150 PRINT RT 13*0;"VALOR FINRNCIRD 
0 = 

160 INPUT P 
170 PRINT P 
180 LET R=P#COEF 

190 PRINT RT 15*0?"VALOR PRESTRCRO 
= " ? R 

195 ”RINT RT 21*5? "CONT1NURR <S/N) 

?" 

200 LET A$=INKEY$ 

210 IF A$*"" THEN GOTO 200 
220 IF fl$= ,, S" THEN GOTO 10 
230 STOP 


chamada de coeficiente de financia¬ 
mento por unidade de capital (em ou¬ 
tra linguagem, P representa o preço 
que a loja cobraria se a mercadoria 
fosse vendida à vista, já com uma cer¬ 
ta margem de lucro). 

Através da linguagem BASIC, 
montamos então o programa ao lado. 

Vamos então montar uma tabela de 
coeficientes por unidade de capital fi¬ 


nanciado, para i = 12% ao mês, e 
uma carência de k = 3 meses. 

Não se esqueça que a tabela acima 
é apenas ilustrativa, podendo ser 
montada para qualquer prazo de ca¬ 
rência, e o número de prestações que o 
cliente desejar, a uma dada taxa, sen¬ 
do essa taxa considerada de tal manei¬ 
ra que o retorno do capital financiado 
apresente um lucro real. Ret. P27 


CHEGUE NA FRENTE 
DOS OUTROS! 

_■ • V 1 ". _ 


Curso de Computação para 
alunos de 19 e 29 ciclos 
Turmas especiais para 
alunos de 11, 12, 13, 14 e 15 anos 
Introdução ao microcomputador > 
linguagem basic 

aulas de recuperação pelo "micro" 
programas práticos 
jogos educativos 

Curso especial 
para adultos e executivos 
Introdução ao microcomputador I e II 
linguagem basic 

Turmas reduzidas de apenas 10 alunos 
1 computador para cada 2 alunos 
10 microcomputadores Prológica 

Microcomputadores CP 300 e CP 500 
Duração da aula: 1:30 horas 


ESCOLAS 

□ LIFE 

IDIOMAS 

Aprenda programação com quem entende. 

A Life coloca a sua disposição em São Bernar¬ 
do e SAnto André, salas de aula com micros 
para você praticar e estudar. Visando melhor 
rendimento a Life providencia turmas reduzi¬ 
das. Professores altamente treinados. Cur¬ 
sos totalmente apostilados já inclusos no 
preço. 

A Life coloca à sua disposição 3 níveis dife¬ 
rentes: Basic I, Basic II e Basic III 
(avançado), com duração de 2 meses cada. 
Cursos aos sábados e no período noturno pa¬ 
ra sua melhor facilidade (2 vezes por sema¬ 
na). Cursos para empresas (curso fechcdo). 


BYTÉ SCH00L 

Av. dos Eucaliptos, 798 - Brooklin Paulista 
Fone: 61.8528 ' 


Santo André 

Rua Luiz Pinto Flaquer, 351 
Centro - Fone 454.7622 

São Bernardo do Campo 
Rua Marechai Deodoro, 1298 
Centro - Fone 448.7184 
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Novidades para 
a linha dos CPs 


Durante a III Feira Internacional 
de Informática, realizada em São 
Paulo, no mês de outubro, a Prológica 
apresentou ao público uma série de 
lançamentos para a sua linha de Com¬ 
putadores Pessoais. 

Para o CP 200, CP 300 e CP 500, a 
Prológica apresentou duas placas de 
alta resolução que acopladas ao video 
desses micros permitem ao usuário 
traçar gráficos mais precisos e fazer 
desenhos técnicos e artísticos, em alta 
resolução. No CP 300 e CP 500, essa 
resolução é de 98.304 pontos. No CP 
200, de 47.616 pontos, com comandos 
em Basic incorporado. 



Foto 5A - Fonte de alimentação, joycontrol e 
D 300, acoplados ao CP 300. 

Como opcional para o CP 300, a Pro¬ 
lógica lançou uma placa de saída serial 
RS 232 C, que permite a comunicação 
direta entre micros e comunicação serial 
de computador a computador, por linha 
telefônica, através de modens. Ainda 
para o CP 300, a empresa apresentou o 
monitor de vídeo MV 3000, de 12”, em 
fósforo verde. O MV 3000 possui fonte 
interna de alimentação, podendo operar 
em 110 e 220 volts. 

Outra novidade foi o Didata 16, um 
acessório que permite interligar um 
CP 500 com até 16 CPs 300 ou CPs 
500. O Didata 16 foi desenvolvido por 
técnicos da Prológica, com um inves¬ 
timento de Cr$ 50 milhões, sendo 
ideal para utilização em centros de 
treinamento e escolas, no ensino de 
matemática, física, geometria. 

Os outros lançamentos Prológica 
durante a Feira foram o Joycontrol, 


Nesta seção, pequenas notas sobre a área de informática. 


um controlador de jogos para toda a 
linha de Computadores Pessoais da 
empresa; Som Estéreo, um acessório 
para o CP 300 e CP 500, que permite 
ao usuário ligar esses computadores a 
amplificadores, ideal para jogos e cria¬ 
ção de músicas; Disco Winchester de 5 
Mb, para o CP 500; Disco Flexível, 
dupla face, de 5 1/4”, 350 Kb, para o 
CP 500; o D300, uma unidade de disco 
de 5 1/4”, face simples, dupla densida¬ 
de, com capacidade de 158 Kb, para o 
CP 300; e o Prosoft, uma fita com 19 
aplicativos e jogos para o CP 200. 

Todas estas novidades estarão à dispo¬ 
sição dos usuários nos revendedores Pro¬ 
lógica a partir de janeiro de 1984, com ex¬ 
ceção do Prosoft, que já está sendo distri¬ 
buído gratuitamente pela empresa, 
quando da compra de um CP 200. 


Livros Novos 


A Editele — Editora Técnica Ele¬ 
trônica está lançando dois novos títu¬ 
los para a área de informática: Basic 
para Crianças, dos 8 aos 80, Vol. 1, de 
Michael P. Zabinski, 127 páginas; e 
Sugestões para o Programador Basic, 
de Earl R. Savage, 126 páginas. 

Basic para Crianças foi escrito para 
os jovens que querem aprender a pro¬ 
gramar qualquer micro compatível com 
TRS-80. Segundo o autor, para com¬ 
preender o livro, não é necessário ne¬ 
nhum conhecimento prévio, pois ape¬ 
nas os pontos mais importantes do Basic 
são abordados, sendo o assunto desen¬ 
volvido de uma maneira envolvente. 

Sugestões para o Programador Basic 
pretende facilitar e melhorar a elabora¬ 
ção de programas em Basic através de 
truques e técnicas de programação. As 
instruções das sub-rotinas e fragmen¬ 
tos de programas que compõem o livro 
foram escritos em linguagem Basic Ní¬ 
vel II, da Radio Shack, que se adapta 
a outras versões de Basic. 

Para advogados, a Editora Gráfica 
Jarbex está lançando O Microcompu¬ 
tador no Escritório — Modernização 
da Advocacia, de Márcio N. Baeta, 97 
páginas. 

Neste livro, Márcio Baeta indica de 
forma simples e objetiva as vantagens 
do microcomputador no escritório de 
advocacia, abordando desde os sistemas 
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de informações gerenciais do advogado, 
passando por automação de escritório e 
processamento de texto, até breves con¬ 
ceitos de informática jurídica. 


Lançamentos Polimicro 


A Polimicro, especializada em hard 
e software de micros compatíveis com 
o Sinclair, está colocando no mercado 
uma série de novidades. A primeira 
delas é o CMS/ZX Especial, um cali¬ 
brador e modulador de sinais para lei¬ 
tura de fitas magnéticas, que atende 
aos usuários do CP 200. 

Segundo informações de João Cândi¬ 
do Collado, diretor da Polimicro, o 
CMS/ZX Especial aumenta o tempo de 
vida útil das fitas, pois filtra os sinais 
emitidos pelo gravador. Além disso, o 
modulador do periférico, através de um 
VU (mostrador de agulhas) acusa even¬ 
tuais problemas da fita e permite ao 
usuário trabalhar com volumes diferen¬ 
tes de gravação. O CMS/ZX Especial 
pode ser encontrado nas lojas especiali¬ 
zadas em microcomputadores. 

Neste mês de dezembro, a Polimi¬ 
cro estará lançando uma placa que 
implementa, no vídeo do CP 200, 16 
cores simultâneas sobre um fundo 
qualquer. Atualmente, a empresa está 
desenvolvendo uma placa de alta reso¬ 
lução, que vai redefinir os caracteres 
do CP 200, possibilitando letras 
maiúsculas, minúsculas, além de per¬ 
mitir a elaboração de gráficos e dese¬ 
nhos artísticos. 

A Polimicro também desenvolve e 
comercializa o “Super CP 200”, com 
duas saídas para joysticks, dois leds 
indicativos e teclado numérico reduzi¬ 
do, com as seguintes funções: as qua¬ 
tro operações matemáticas diretas 
(sem usar Shift); parênteses; Delete 
direta; Print; Enter; liga desliga bip 
(por chave); inversão do vídeo, com 
três posições: fundo branco, fundo 
preto e fundo branco para a visualiza¬ 
ção do movimento do cursor. 

Além dessas modificações, no “Su¬ 
per CP 200” as teclas Resset foram 
para a parte posterior do micro. Isto 
permitiu que as teclas Resset conven¬ 
cionais ficassem livres para: repetição 
automática de letras (desde que se 
pressione a Resset da esquerda e uma 
letra qualquer) e auto-função direta. 
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Micro ’s, Atuando 
Junto a Médicos 
e Dentistas 



Utilizar ao máximo a capacida¬ 
de dos computadores pessoais, 
através de uma programação mo¬ 
dular, não-redundante, aprovei¬ 
tando totalmente os recursos de 
memória e linguagem. Este é um 
dos objetivos da Micro s, uma 
software-house de São Bernardo 
do Campo, especializada em com¬ 
putadores similares ao TRS-80 e 
Sinclair. 

Há um ano e meio no mercado, 
sempre procurando atingir setores 
menos explorados pela concorrência, a 
Micro ’s foi uma das primeiras 
software-houses no País a desenvolver 
programas para microcomputadores 
nas áreas de medicina e odontologia. 
Atualmente, com uma equipe de seis 
programadores, a Micro’s conta com 
um catálogo de 70 títulos, entre jogos e 
utilitários, comercializados pelos prin¬ 
cipais revendedores de computadores. 

Suporte ao Usuário 

Apesar de trabalhar somente junto a 
revendedores e fabricantes, a Micro’s 
não deixa de dar assistência ao usuário 
final. Manuais, cursos, suporte de im¬ 
plantação de utilitários e atualização 
de programas são alguns dos benefícios 
que a casa oferece a seus clientes, com 
uma filosofia especial: se o usuário é 
pessoa física, estes serviços são gratui¬ 
tos. Do contrário, o suporte é devida¬ 
mente cobrado. 

Walter Roberto Mello Gonçalves, 
dono da Micro’s, explica: “O impor¬ 
tante não é ganhar dinheiro com soft¬ 
ware, mas fazer um trabalho sério, vol¬ 
tado ás reais necessidades dos usuários 
e à constante renovação do mercado”. 
Para manter os revendedores de seus 
produtos em dia com as novidades, 
Walter chega a trocar gratuitamente os 
jogos estocados de primeira geração 
pelos de segunda, mais atuais. 
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Além disso, o sistema de comerciali¬ 
zação de um utilitário se assemelha em 
muito ao das software-houses que de¬ 
senvolvem programas para médios e 
grandes computadores. Antes da ven¬ 
da, a Micro’s faz uma palestra de apre¬ 
sentação e descrição do utilitário, que 
permite ao provável usuário uma cor¬ 
reta avaliação do produto. 

Mas a empresa não dispensa atenção 
apenas a seus clientes. Qualquer pes¬ 
soa pode se dirigir, pessoalmente ou 
por telefone, ao Banco de Consultas da 
software-house e esclarecer qualquer 
dúvida a respeito do hardware e soft¬ 
ware dos computadores pessoais, con¬ 
sultar livros e revistas da área e até 
mesmo utilizar os equipamentos do 
show-room da empresa. 

Programas 

A Micro s prefere sempre desenvol¬ 
ver seus próprios programas, nem que 
para isso leve mais tempo. “Mesmo 
que nós quiséssemos”, explica Walter, 
“não poderíamos importar software, já 
que a nossa área de maior interesse, 
médico-odontológica, requer progra¬ 
mas totalmente adaptados à realidade 
do País”. Um dos principais softwares 
desenvolvidos pela Micro s é o Odonto, 
um utilitário que levou três anos para 
ser desenvolvido e que acabou dando 
origem à própria software-house. 


Em versão cassete, o programa 
permite o cadastramento de até 120 
clientes em tratamento; consulta à 
agenda; atualização do cadastro de 
clientes; demonstração dos atrasos 
de pagamento; estatística de valores 
para controle de Imposto de Renda; 
marcação de consultas; baixa de pa¬ 
gamento com correção do salto de¬ 
vedor; acompanhamento clínico por 
odontograma; além da emissão de 
várias listagens. 

Em disco, mais poderoso, o Odon¬ 
to possibilita o cadastramento de 700 
clientes além de emitir listas de pre¬ 
ços de tratamento; cartas de cobran¬ 
ça; acompanhamento clínico por 
odontograma atualizado; cadastro 
de preços; emissão de recibos de pa¬ 
gamento. O Odonto roda em toda a 
linha de Computadores Pessoais 
Prológica e tanto a fita quanto o dis¬ 
quete podem ser encontrados nos re¬ 
vendedores especializados por 30 ou 
50 ORTN’s, respectivamente. 

Para a área médica, a Micro’s de¬ 
senvolve e comercializa o Diagnósti¬ 
co, um aplicativo que permite, entre 
outras coisas, o cadastramento e 
diagnóstico de moléstias, sintomas; 
criação e emissão de receitas; lista¬ 
gem de moléstias, sintomas e arqui¬ 
vo de receitas. O Diagnóstico roda 
no CP 300 e CP 500, sendo comer¬ 
cializado em disquete ao preço de 20 
ORTNs. 

A Micro s também desenvolve 
aplicativos para a área comercial, 
como Cadastro de Clientes, Controle 
de Estoques e Editor de Textos. E, 
para o lazer, a software-house elabo¬ 
rou mais de 40 jogos, com preços que 
variam entre Cr$ 4 mil e 800 e Cr$ 
11 mil e 400. 

O endereço da Micro’s é av. Indi¬ 
co n? 30 - 7? and., sl. 73, tel.: (011) 
448-6234 - São Bernardo do Campo, 
SãO Paulo. Ref. M 212 








Modelo CP 300/ CP 500 
16K RAM 
Basic Residente 


Com este jogo você poderá 
passar algumas horas agradáveis ao 
lado do seu micro, tentando 
controlar um esquiador em percursos 


cheios de obstáculos. O jogo é 
auto-explicativo e bastante simples, 
apresentando dificuldades apenas ao 
esquiador. Ref. m 213 / p 28 


10 ' X * X X X X X X X X X X X X X X X X X X X X X X X X X X X X 

20 'x E S Q U I x 

30 '* P R 0 L 0 G I C A - 1983 * 

'•40 '# CP 300/500 x 

50 y XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

60 CLS 

70 PRINT02+20r "E 9 Q ü I" s PR JNT<33* 
6*4•♦•2/ "DESEJA INSTRUÇÕES (8/N) ?" 

80 B*»INKEY$sIFB*= n " THEN GÜT088 

90 IF THEN GOTO 160 :IF B$ 

<>"S" THEN GOTO 80 

100 PRINTQ2/ n 0 OBJETIVO DESTE JOGO 
E' CONTROLAR 0 ESQUIADOR DURANTE 
0 PERCURSO« 11 

1.1.0 PRINT02#64+2, “PARA ISSO VOCE T 
EH AS SEGUINTES TECLAS DE CONTROLE 

s M sPRINTG4*64+2, " > MOVE PARA A 

DIREITA"8PRINTG5*64+2,"<- MOVE 

PARA A ESQUERDA" 

120 PRINTr/*64+2,"CASO CONTRARIO 0 
ESQUIADOR SEGUIRA' SEMPRE EM LIN 
HA RETA,," 

130 PRINT@8*64+2*"AO FINAL SERA 7 E 
XIBIDO NA TELA O NUMERO DE VEZES Q 
UE VOCE CHOCOU NOS OBST 

ACUL.OS „ " 

140 PRINT@10*64+2* "BOA SORTE" 3 PR IN 
T<915x60-3, "PRESSIONE <EMTER>" 

130 A$-~INKEY$ - IF AS= ,,n THEN 150 
ELSE CLS 

160 DEFINTL-Z 2 L=200sDIMZC(L+7) 

170 YD-RND (3) *~2 2 1F YD~0 THEN 170 
180 DEFSTRA-F 2 A=CHR*(170)+CHR*(170 
)2 B~CHR*( 171) s OCHR* C151) 

190 CLSsPRINTÔl,?8lNPUT"GRAU DE D 
IFICULDADE <lr2 OU 3) n ?ZDsIF ZD<0 
0R ZD>3 THEN 190 


200 Y 0 2 Z :r: 1 8CLSsPRINT@19, "DEFININD 
0 O PERCURSO - " sPRINTQ2*64r "AGUARDE 
UM MOMENTO" 

210 Y1^RND(ZD*2+1)-3sYD*-YD 
220 X»RND ( 6 / < AB 8 (Y 1 ) + 1 ) ) +RND ( 2 ) , 11 F 
X+1®Z1 THEN 220 ELSE FOR Zl*l TO 
X 3 y*Y+Y1#YDsIF A BS (Y)>25 YD»-YD 
:Y«Y+Y1*YD 

230 ZC(Z)«YsZ®Z+lsIF ZCL.+1 NEXTsGÜ 
TÜ 210 

240 CLSsU«0sX*0 

250 FOR Z~1 TO LsPRINT0985+ZC<Z >,& 
2 GOSUB 310 3PRINTQ996+ZG(Z) r C sGOS 

UB 310 sNEXT 

260 FOR Z»Z TO Z+6 sPRINT01023.sGOS 
UB310 s PRINT01023 ,3 GOSUB 310 s NE 
XT 

270 IF U~0 THEN PRINTQ192x"PARABEN 
S- VOCE E' UM OTIMO ESQUIADOR. 

NAO BATEU N 

ENHUMA VEZ NAS BANDEIRINHAS."sGOTO 
300 

280 IF U«1 THEN PRINT0192x"PARABEN 
S„ VOCE CHOCOU APENAS UMA VEZ NAS 
BANDEIRINHAS-"s GOTO 300 
290 IP U>1 THEN PRINT(§192r "VOCE CH 
OCOU "?Uy " VEZES NAS BANDEIRINHAS. 

300 PRINT0384*"MESMO PERCURSO (S/N 
>" 33 INPUTD 5 D«LEFT* (Dr 1) s IF D~"F" T 
1-IEN END ELSE IF D^"S" OR D«"s" THE 
N 240 ELSE 190 

310 IF <PEEK(14400)AND32) ~ 32X ~ X-1 
320 IF (PEEK(14400)AND64)«64X*X+1 
330 PRINT060y U ps PRINT030+X,A; sIF Z 
<8 THEN RETURN ELSE IF ABS<ZC(Z~7) 
-X)<5 RETURN 

340 FORZZ«l TO 7sPRINT030+X * ,, *# u y 2 
PRINT030+X,A* bNEXT;X«ZC(Z- 7)sU*U+l 
3 RETURN 
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Cadastro de 
Clientes 
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Este programa fornecerá a você um 
exemplo de rotinas que permitem a gra¬ 
vação e a leitura de dados em fita K-7, 
armazenados seqüencialmente. Além 
disso, o programa também tem como 
função o cadastramento dos dados e a 
consulta por nome ou endereço das in¬ 
formações armazenadas em memória. 

1 * tf X*X X- X X-X X X X X-X X XX X-*###*'11*****##*-x 

2 7 * CflDflSTRO * 

3 '* DE * 

4 7 * CLIENTES» * 

5 7 xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
20 CLEOR 20008J=0sDlM N* (100 ) s DIM 
E*(100) :DIM T$(100)sDIM D* (100) 

30 GOSUB 240 

40 PRJ.NT @12x64+40," "? 

50 0*=INKEY* 

60 IF 0*="" THEN GOTO 50 
70 S=V0L<0*) 

80 IF 0$~CHR$(13) THEN CLSsEND 
90 IF S<1 OR S>6 THEN GOTO 50 
100 ON S GOSUB 460 ,770 ,1000 ,1 

240 ,1530 ,1650 
110 GOTO 30 

120 ' SUB-ROTINO : COBECOLHO 
130 CLS 

140 PRINT @21,"CODOSTROMENTO DE CL 
IENTES" 

150 PRINT @1*64+21,"============== 


160 PRINT @1X64,B* 

170 PRINT @15*64,"MENSAGEM :"9 
180 RETURN 

190 SUB-ROTINR: DIGITOCOO DR DAT 

R 

200 IF MID*(D$(I+J),3,1)<>"/" THEN 
PRINT @10*64+12,STRING$(LEN(D*(I+ 
J) ) " ) : GOTO 620 

210 IF MID$<D*<I+J),6,1)<>"/" THEN 
PRINT @10*64+12,STRING$(LEN(D* <I + 
J)>," "ysGOTO 620 
220 GOTO 660 

230 DRTR JRNEIRO,1,FEVEREIRO,2,MOR 
CO ,3,RBRIL,4,MRI0,5,JUNHO,6,JULHO, 
7,RGOSTO,8,SETEMBRO,9,OUTUBRO,10,N 
OVEMBRO,11,DEZEMBRO,12 
240 ' SUB-ROTINRs TELR DE FUNCOES 
250 CLS 

260 PRINT @21,"CRDRSTRRMENTO DE CL 
IENTES" 

270 PRINT @1*64+21,"============== 


280 PRINT @3*64+24,"FUNCOES" 

290 PRINT @5*64+21,"1- CRIOCOÜ" 

300 PRINT @6*64+21,"2- CONSULTO PO 
R NOME" 

310 PRINT @7*64+21,"3. CONSULTO PO 
R ENDEREÇO" 

320 PRINT @8*64+21,"4. ANIVERSARIO 
NTES" 


Vale ressaltar, que se você gravou 
alguns dados em fita K-7 e deseja au¬ 
mentar seu cadastro, transfira primei¬ 
ramente os dados da fita para a me¬ 
mória — através da função Leitura 
dos Dados — para somente depois in¬ 
serir novos clientes, complementando 
a lista já existente. Ret P29 


330 PRINT @9*64+21,"5- GROVOCOO DO 
S DODOS" 

340 PRINT @10*64+21,"6. LEITURO DO 
S DODOS" 

350 PRINT @12*64+21,"SELECOO OU EN 
TER: " 

360 PRINT @15*64,"MENSOGEM: "5 
370 RETURN 

380 ' SUB-ROTINR: TELO CRIOCRO/CON 
SULTO 

390 GOSUB 120 

400 PRINT @4*64,"NOME_s" ; 

410 PRINT @6*64,"ENDEREÇO:"; 

420 PRINT @8*64,"TELEFONE:"; 

430 PRINT @10*64,"DT.NOSC. 

440 PRINT @15*64,"MENSOGEM:"? 

450 RETURN 

460 7 SUB-ROTINOs CRIOCOO 
470 B$="CRIOCAG" 

480 GOSUB 120 

490 PRINT @15*64,"MENSOGEM: QUANTO 
S CLIENTES DESEJO CADASTRAR "; 

500 INPUT 0 

510 FOR 1=1 TO A 

520 GOSUB 380 

530 PRINT @4*64+9," "; 

540 INPUT N*(I+J) 

550 IF LEN (N$(I+J))>30 THEN PRINT 
@4*64+12,STRING$(LEN(N$(I+J))," ") 
:GOTO 530 

560 PRINT @6*64+9," "; 

570 INPUT E«(I+J) 

580 IF LEN(E$(I+J))>30 THEN PRINT 
@6*64+12,STRING*(LEN(E*(I+J))," ") 
:GOTO 560 

590 PRINT @8*64+9," " ; 

600 INPUT T$(I+J) 

610 IF LEN(T$ (1+J))>8 THEN PRINT @ 
8*64+12,STRING$(LEN(T$(I+J))," "): 
GOTO 590 

620 PRINT @10*64+9," "; 

630 INPUT D$(I+J) 

640 IF LEN(D$(I+J))>8 THEN PRINT @ 
10*64+12,STRING$(LEN(D$<I+J))," ") 
:GOTO 620 
650 GOTO 190 

660 PRINT @15*64+10,"DODOS CORRETO 
S (S/N)?"; 

670 0*=INKEY* 

680 IF 0$="" THEN GOTO 670 
690 IF 0$="S" THEN GOTO 720 
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700 IF A$=-"N" THEN GOTO 520 
710 GOTO 670 
720 NEXTI 

730 J=J+0:GOSUB 120 
740 PRINT @15*64+10, "LEMBRE-SE DE 
ns DODOS NO FITO K-7 !!!*•; 
750 FOR K=1 TO 1000:NEXTK 
760 RETURN 

770 7 SUB-ROT.TNO: CONSULTO POR NOM 
E 

780 B$="CQNSULTO POR NOME" 

790 GOSUB 120 
800 GOSUB 380 

810 PRINT @15*64+10,"DIGITE NOME P 
/ CONSULTOR."; 

820 PRINT @4*64+9," "; 

830 INPUT Nl$ 

840 IF N1$-"FIM" THEN RETURN 
850 IF LEN(NI $)>30 PRINT @4*64 + 12, 
STR.ING$ ( LEN (N1 $ ) , " ")s GOTO 820 
860 I”0 
870 1*1+1 

880 IF I>J THEN PRINT @15*64+10,"N 
OME NOO ENCONTRADO !!! ";:FOR 
H=1 TO 1000:NEXTH:GOTO 770 
890 IF N*(I)=N1* THEN GOTO 910 EL 
SE GOTO 870 

900 PRINT @4*64+10,NU»(I ) 

910 PRINT @6*64+10,E$(I) 

920 PRINT @8*64+10,T$(I) 

930 PRINT @10*64+10,D*(I) 

940 PRINT @15*64+10,"'DESEJO NOVO C 
ONSULTO (S/N)?"; 

950 0$=INKEY$ 

960 IF 0$="" THEN GOTO 950 

970 IF 0$="S" THEN GÜSUB380 : GOT 

0 870 

980 IF 0$="N" THEN RETURN 
990 GOTO 950 

1000 7 SUB-ROTINOs CONSULTO POR EN 
DERECO 

1010 B$="CONS» P/ END." 

1020 GOSUB 120 
1030 GOSUB 380 

1040 PRINT @15*64+10,"DIGITE ENDER 
ECO P/ CONSULTOR."; 
i050 PRINT @6*64+9," "; 

1060 INPUT Eli 

1070 IF E1$="FIM THEN RETURN . 

1080 IF LEN( El $)>30 THEN PRINT @6* 
64+12,STRING$(LEN(E1$)," "):GOTO 1 
050 
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Software CPs 


Zap Informática Ltda. 

Rua Dom Gerardo, 63 
GR. 1602 

20090 Rio de Janeiro - RJ 


SOFTWARE CP 500 

1) Nome: Convídeo 
DESCRIÇÃO: Controle de Vídeo 
Club (filmes associados e mensali¬ 
dades). 

PREÇO: 50 ORTNs 
D/F 

2) Nome: Conseg 
DESCRIÇÃO: Controle de vendas 
de seguro (p/ Corretora de Segu¬ 
ros). 

PRECO: 60 ORTNs 
D/F 

3) Nome: Pagrec 
DESCRIÇÃO: Contas a pagar e re¬ 
ceber. 

PRECO: 40 ORTNs 
D/F 


Ramo Sistemas Digitais 
Rua Dep. Lacerda Franco, 120. 
Conj. 52 - tel. (011) 211.3119/ 
7421 


SOFTWARE CP 500 

1) Nome: Agenda 

Agenda Compromissos das 8 às 
17 hs. 

PREÇO: 20 ORTNs 
D/F 

2) Nome: Arcurso 
DESCRIÇÃO: Com seleção de 12 
matérias, notas dos alunos e pesos 
por mês, impressão do boletim e 
classificação dos alunos por notas. 
PRECO: 70 ORTNs 

D/F 

3) Nome: Bancário 
DESCRIÇÃO: Com saldo bancário 
Débito / Crédito, só débito, só cré¬ 
dito. Pode emitir cheques. 

PRECO: 60 ORTNs 

D/F 


Conheça aqui alguns dos programas 
que existem no mercado para 
a Unha de Computadores Pessoais 
Proiógica 


4) Nome: Clientes 
DESCRIÇÃO: Cadastra os clientes 
com conceito, saldo acumulado de 
compra e relatórios. 

PRECO: 50 ORTNs 
D/F 

5) Nome: Contabilidade 
DESCRIÇÃO: Com dupla partida, 
diário, razão, balancete, balanço. 
PRECO: 100 ORTNs 

D/F 

6) Nome: Contas a pagar 
DESCRIÇÃO: Com emissão de bor- 
derô e mais de 55 relatórios. 
PRECO: 80 ORTNs 

P/F 

7) Nome: Contas a receber 
DESCRIÇÃO: Com controle de co¬ 
missões e mais de 55 relatórios. 
PRECO: 80 ORTNs 

D/F 

8) Nome: Estoque 
DESCRIÇÃO: Com 4 tipos de movi¬ 
mentações. Gerenciamento físico 
financeiro. 

PRECO: 100 ORTNs 
D/F 

9) Nome: Faturamento 
DESCRIÇÃO: Com estoque (baixa 
automática), clientes, vendedores, 
pedidos, emissão de notas fis¬ 
cais/duplicatas. 

PRECO: 310 ORTNs 
D/F 

10) Nome: Folha de pagamento 
DESCRIÇÃO: Com impressão de 
recibos, quebra por seção/se¬ 
tor/departamento e relação bancá¬ 
ria. 

PRECO: 100 ORTNs 
D/F 

11) Nome: Mala direta 
DESCRIÇÃO: Com impressão de 
etiquetas e formulários. 14 tipos de 
seleção. Impressão por 9 campos 
selecionados. 

PRECO: 50 ORTNs 
D/F 


12) Nome: Pedidos 
DESCRIÇÃO: Verifica a posição 
dos pedidos e compõe o pedido em 
até 13 itens. 

PRECO: 80 ORTNs 
D/F 


Sidapis Software House 
Av. Onze de Junho, 590 
Tel.: 570.0676 - 544.4108 


SOFTWARE CP 500 

1) Nome: Sistema Consulta de 
processos para advogados. 
DESCRIÇÃO: Consulta e acompa¬ 
nhamento de processos jurídicos. 
PRECO: 50 ORTNs 
D/F 


Najason Sistemas 
Av. Rio Branco, 45 Gr. 1311 
Tel.: (021) 263.1241 Rio de Ja¬ 
neiro 


SOFTWARE CP 500 

1) Nome: Contabilidade 
PRECO: 30 ORTNs 
DISCO 


2) Nome: Folha de pagamento 

PRECO: 12 ORTNs 

DISCO 


3) Nome: Controle de estoque 
PRECO: 20 ORTNs 
DISCO 


4) Nome: Contas a pagar/rçceber 

PRECO: 15 ORTNs 

DISCO 


5) Nome: Contas a receber 
PRECO: 24 ORTNs 
DISCO 

6) Nome: Mala Direta c/ editor de 
textos. 

PRECO: 25 ORTNs 
DISCO 


DIF - Disco/Fita 


7) Nome: Administração de imó¬ 
veis 

PRECO: 55 ORTNs 
DISCO 

8) Nome: Controle de saldo bancá¬ 
rio. 

PRECO: 15 ORTNs 
DISCO 

9) Nome: Multifunção 
DESCRIÇÃO: Cadastramento ' de 
fórmulas e tabelas para futuras exe¬ 
cuções. 

PREÇO: 20 ORTNs 
DISCO 

10) Nome: Cadastro clientes p/ Clí¬ 
nicas. 

DESCRIÇÃO: Controla clientes / 
empresas de uma clínica médica 
PRECO: 15 ORTNs 
DISCO 

11) Nome: Elaboração contratos 
p/ cartórios 

PRECO: 30 ORTNs 
DISCO 


12)7 Nome: Contabilidade 
PRECO: 5 ORTNs 
FITA 


13) Nome: Contas a pagar/receber 

PRECO: 6 ORTNs 

FITA 


14) Nome: Controle de estoque 
PRECO: 8 ORTNs 

FITA 

15) Nome: Editor de texto 
PRECO: 4 ORTNs 

FITA 


16) Nome: Mala Direta 
PRECO: 6 ORTNs 
F[TA 


17) Nome: Arquivo de processos 

PREÇO: 3 ORTNs 

FITA 
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18) Nome: Controle de livros 
PREÇO: 2,5 ORTNs 

FITA 

19) Nome: Controle de cheques 
PREÇO: 2,5 ORTNs 

FITA 

20) Nome: Kit Matemática 
DESCRIÇÃO: Gráficos, curva, inte¬ 
gral, eq. diferencial, estatística, reg. 
e correi, lineal. 

PREÇO: 8 ORTNs 
FITA 

21) Nome: Controle de custos 
PREÇO: 5 ORTNs 

FITA 


22) Nome: Histograma 
PRECO: 2,2 ORTNs 
FITA 


23) Nome: Biorritmo 
PRECO: 2 ORTNs 
FfTA 


24) Nome: Decisão 
PREÇO: 2,2 ORTNs 
FITA 

25) Nome: Jogos 
DESCRIÇÃO: Senha, obstáculos, 
forca, road. 

PREÇO: 2,2 ORTNs cada 
FITA 

26) Nome: Jogos 
DESCRIÇÃO: Supernova, Attak/ 
Lander, Spack, Intruders, Meteor, 
Galaxy Invasion. 

PREÇO: 2 ORTNs cada 

27) Nome: Xadrez 
PRECO: 4 ORTNs 
FITA 

28) Nome: Jogos 
DESCRIÇÃO: Alien, Cosmic. Val- 
quíria, Penetrator. 

PREÇO; 2,5 ORTNs 


Engesoft 

Tel.: (011) 93.0383 

São Paulo 


SOFTWARE CP 500 

1) Nome: Dimensionamento de ei¬ 
xos. 

PRECO: 30 ORTNs 
D/F 


2) Nome: Dimensionamento de en¬ 
grenagens 

PRECO: 50 ORTNs 
D/F 

3) Nome: Sistema de Eq. Lineares 
PRECO: 15 ORTNs 

D/F 

4) Nome: Cálculo de área (terre¬ 
nos) 

PRECO: 2 ORTNs 
D/F 


5) Nome: Cálculo de redes Pert 
PREÇO: 10 ORTNs 

D/F 

6) Nome: Conversão de unidades 
PRECO: 2 ORTNs 

D/F 


Casa do microcomputador 
Av. Anhanguera, 2574 
Tel.: (062) 223.1165 
Goiânia - GO 


SOFTWARE CP 500/300 

1) Nome: Microf 

DESCRIÇÃO: Mala direta com edi¬ 
tor de textos. 

PREÇO: 3,5 ORTNs (fita) 

14 ORTNs (disco) 

D/F 


Everton Consultoria e Software 
R. Carolina, 41/602 
Icaraí - Niterói 
Tel.: (021) 710.4016 


SOFTWARE CP 500 

1) Nome: Agenda de nomes e en¬ 
dereços. 

DESCRIÇÃO: Gerenciador de 
agenda telefônica. 

PREÇO: Sob consulta 
D/F 

2) Nome: Fotos 

DESCRIÇÃO: Controle de arquivo 
de fotografias. 

PREÇO: Sob consulta 
D/F 

3) Nome: Recados 
DESCRIÇÃO: Memorização de re¬ 
cados para diversas pessoas. 
PRECO: Sob consulta 

D/F 

$ 

4) Nome: Biorritmo 
DESCRIÇÃO: Cálculo do biorritmo 
PRECO: Sob consulta 

D/F 

5) Nome: Editor de figuras 
DESCRIÇÃO: Edição e cópia de de¬ 
senhos. 

PRECO: Sob consulta 

d/f' 

6) Nome: Agenda de atividades 
Gerenciamento pessoal. 

PRECO: Sob consulta 

D/F 


7) Nome: Estoque 
PREÇO: Sob consulta 
D/F 

8) Nome: Contas bancárias 
DESCRIÇÃO: Contas correntes de 
até 10 bancos. 

PRECO: Sob consulta 
D/F 


9) Nome: Estatística 
DESCRIÇÃO: Controle de vendas, 
lucratividade e qualidade de produ¬ 
ção. 

PREÇO: Sob consulta 
D/F 

10) Nome: Análise financeira. 
DESCRIÇÃO: Cálculo de valores fi¬ 
nanceiros de investimentos e amor¬ 
tizações. 

PREÇO: Sob consulta 
D/F 

11) Nome: Crediário. 

DESCRIÇÃO: Contcple de crédito. 
PRECO: Sob consulta 

D/F 

12) Nome: Contas a pagar e rece¬ 
ber. 

DESCRIÇÃO: Controle de fluxo de 
caixa. 

PRECO: Sob consulta 
D/F 

13) Nome: Administração de bi¬ 
bliotecas. 

DESCRIÇÃO: Cadastro, listagem e 
pesquisa de livros. 

PREÇO: Sob consulta 
D/F 

14) Nome: Controle de pagamen¬ 
tos. 

DESCRIÇÃO: Controle de paga¬ 
mentos dos alunos, além de cadas¬ 
tro dos mesmos. 

PREÇO: Sob consulta 
D/F 

15) Nome: Curso de Basic. 

D/F 


16) Nome: Contas. 

DESCRIÇÃO: Matemática para 
crianças de 3 a 6 anos. 

PRECO: Sob consulta 
D/F 


17) Nome: Utilitários. 
Interpretador Basic, Compilador 
Basic, Compilador Cobol, Compila¬ 
dor Fortran, Pro-File III, Visicalc, 
Scripsit, New-DOS, Plus DOS. 


Sidenge 

Rua Guararapes, 865 
Tel.: (011) 240.7244 
São Paulo. 


SOFTWARE CP 500 

1) Nome: Cálculo Estrutural. 
DESCRIÇÃO: Resolução de cálculo 
estático de edifícios. 

PRECO: Sob consulta 
D/F 


CP System S/C Ltda. 
Av. Paulista, 2073 
Cj. 1212 - Tel.: 255.5454 


SOFTWARE CP 500 


1) 10 jogos. 

Asteróides, Galáxia, Forca, Cupim, 
Concentração, Risque, Moby, Bick, 

Sky.Cr$ 10.000,00 

DISCO 

2) Nome: CP Text 
DESCRIÇÃO: Editor de texto. 
PREÇO: 11 ORTNs 

DISCO 

3) Nome: Mala Direta. 
DESCRIÇÃO: Cadastro com até 
1000 registros. 

PREÇO: Sob consulta 
DISCO 

4) Nome: Matemática Financeira. 
DESCRIÇÃO: Empréstimos, presta¬ 
ção, taxa de juros. 

PRECO: 6 ORTNs 
DISCO 

\ 

5) Nome: Avaliação de Glebas. 
Método Involutivo. 

PRECO: 5 ORTNs 
DISCO 

6) Nome: Sistema de controle de 
Loteamentos. 

DESCRIÇÃO: Lotes em estoque, 
lotes vendidos, relatório mensal, 
comissões a receber, comissão dos 
corretores. 

PRECO: 40 ORTNs 
DISCO 

7) Nome: Controle de conta ban¬ 
cária. 

DESCRIÇÃO: Cheques emitidos. 
Saldo médio. 

PRECO: Sob consulta 
DISCO 

8) Nome: Sistema de Condomínio. 
DESCRIÇÃO: Cálculo de rateio - 
emite relatório de prestação de con- 

PREÇO: 30 ORTNs 

9) Nome: Sistema de aluguel. 
DESCRIÇÃO: Cadastro de proprie¬ 
tários e propriedades, reajustes de 
aluguéis, recibos, taxa de adminis¬ 
tração. 

PRECO: 40 ORTNs 
DISCO 


MICRO'S - Asses, em Proces¬ 
samento de Dados. 

Av. Índico, 30 - 7? andar 
09700 S. Bernardo - SP 
Tel.: 448.6234 


SOFTWARE CP 200 

1) Nome: Batalha aérea. 
DESCRIÇÃO: Jogo . Cr$ 4.800,00 
F 

2) Nome: Batalha Naval I. 
DESCRIÇÃO: Jogo . Cr$ 6.600,00 
F 

3) Nome: Forca. 

DESCRICÃO: Jogo . Cr$ 4.800,00 
F 
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4) Nome: Tiro ao alvo. 
DESCRIÇÃO: Jogo . Cr$ 4.800,00 
F 

5) Nome: Vôo Simulado I 
DESCRIÇÃO: Jogo . Cr$ 7.800,00 
F 

6) Nome: Comando Ufo 
DESCRIÇÃO: Jogo . Cr$ 4.800,00 
F 

7) Nome: Oeste Selvagem 
DESCRIÇÃO: Jogo . CrS 5.400,00 
F 

8) Nome: Senha 

DESCRIÇÃO: Jogo . CrS 5.400,00 
F 


9) Nome: Batalha Cósmica 
DESCRICÃO: Jogo . CrS 6.600,00 
F 


10) Nome: Dodgem 
DESCRICÃO: Jogo . CrS 6.000,00 
F 


11) Nome: Pouso em Marte 
DESCRIÇÃO: Jogo . CrS 6.000,00 
F 


12) Nome: Albatroz 
DESCRIÇÃO: Jogo . CrS 6.600,00 
F 


13) Nome: Alerta Vermelho 
DESCRIÇÃO: Jogo . CrS 6.600,00 
F 

• 

14) Nome: Mazogs 
DESCRICÃO: Jogo CrS 10.800,00 
F 

15) Nome: Duelo 
DESCRICÃO: Jogo . CrS 6.600,00 
F 

16) Nome: OVNI 

DESCRIÇÃO: Jogo . CrS 5.400,00 
F 


17) Nome: Comando Submarino 
DESCRIÇÃO: Jogo . CrS 6.600,00 
F 

18) Nome: Base Alpha 
DESCRIÇÃO; Jogo . CrS 6.600,00 
F 

19) Nome: Corrida com obstáculos 
DESCRIÇÃO: Jogo . CrS 4.800,00 
F 

20) Nome: Ambassador 
DESCRIÇÃO: Jogo . CrS 5.400,00 
F 


21) Nome: Batalha Naval II 
DESCRIÇÃO: Jogo . CrS 7.200,00 


22) Nome: Colecionador de Cristais 
DESCRIÇÃO: Jogo . CrS 7.800,00 
F 


23) Nome: Perigo, serpente! 
DESCRIÇÃO: Jogo . CrS 7.800,00 
F 

24) Nome: Selva 
DESCRICÃO: Jogo . CrS 8.400,00 
F 

25) Nome: Labirinto 
DESCRICÃO: Jogo . CrS 6.000,00 
F 

26) Nome: Roleta 
DESCRICÃO: Jogo . CrS 5.400,00 
F 

27) Nome: Branco no preto 
DESCRIÇÃO: Jogo . CrS 6.000,00 
F 

28) Nome: Artilharia 
DESCRIÇÃO: Jogo . CrS 6.000,00 
F 

29) Nome: Vôo Simulado II 
DESCRICÃO: Jogo . CrS 6.000,00 
F 

30) Nome: Meteoro 
DESCRICÃO: Jogo . CrS 7.800,00 
F 

31) Nome: King Kong 
DESCRICÃO: Jogo . CrS 9.000,00 
F 

32) Nome: Fungaloides 
DESCRIÇÃO: Jogo . CrS 9.000,00 
F 

é 

33) Nome: Vôo Simulado II! 
DESCRICÃO: Jogo CrS 11.400,00 
F 

34) Nome: Bloqueio 
DESCRIÇÃO: Jogo . CrS 6.000,00 

F *\ 

35) Nome: Super Standart 
DESCRIÇÃO: Jogo . CrS 7.800,00 
F 

36) Nome: Derby 
DESCRIÇÃO: Jogo . CrS 4.800,00 
F 

37) Nome: Guerra dos Mísseis 
DESCRICÃO: Jogo . CrS 5.400,00 
F 

38) Nome: Jornada nas estrelas 
DESCRIÇÃO: Jogo CrS 10.200,00 
F 

39) Nome: Come a cobra 
DESCRICÃO: Jogo . CrS 6.600,00 
F 

40) Nome: Tabuada 

DESCRICÃO: Educativo. 

CrS 4.800 00 

F 

41) Nome: Biorritmo I 

DESCRIÇÃO: Aplicativo. 

CrS 4.800,00 

F 


42) Nome: Loto 

DESCRIÇÃO: Jogo . CrS 4.800,00 
F 

43) Nome: Biorritmo II 

DESCRICÃO: Aplicativo. 

CrS 6.000,00 

F 


44) Nome: Editor de textos 
DESCRIÇÃO: Aplicativo 
CrS 14.200,00 
F 


45) Nome: Eliza 

DESCRIÇÃO: Jogo.. CrS 9.000,00 
F 

46) Nome: Contas a pagar 

DESCRICÃO: Aplicativo. 

CrS 15.600,00 

F 

47) Nome: Agenda 

DESCRICÃO: Aplicativo. 

CrS 11.400,00 

F 

48) Nome: Vídeo-Título 

DESCRICÃO: Aplicativo. 

CrS 18.000,00 

F 

49) Nome: Cadastro de clientes 

DESCRICÃO: Aplicativo. 

CrS 16.200,00 

F 


50) Nome: Compilador Assembler 

DESCRICÃO: Aplicativo. 

CrS 10.200,00 

F 

51) Nome: Desassemblador 

DESCRICÃO: Aplicativo. 

CrS 10.200,00 

F 

52) Nome: Deschaveador 

DESCRICÃO: Aplicativo. 

CrS 12.000,00 

F 


53) Nome: Odonto 

DESCRICÃO: Aplicativo. 

CrS 10 ORTNs 
F 

SOFTWARE CP 300/500 

1) Nome: Forca 

DESCRIÇÃO: Jogo . CrS 5.400,00 
D/F 

2) Nome: Tiro ao alvo 
DESCRICÃO: Jogo . CrS 4.800,00 
D/F 


3) Nome: Comando Ufo 
DESCRICÃO: Jogo.. CrS 6.000,00 
D/F 

4) Nome: Invasores 
DESCRICÃO: Jogo . CrS 6.600,00 
D/F 


5) Nome: Patrulha 
DESCRICÃO: Jogo . CrS 7.200,00 
D/F 


6) Nome: Batalha aérea 
DESCRICÃO: Jogo . CrS 5.400,00 
D/F 


7) Nome: Caça-níqueis 
DESCRICÃO: Jogo . CrS 7.200,00 
D/F 


8) Nome: Jornada nas estrelas 
DESCRICÃO: Jogo CrS 11.400,00 
D/F 


9) Nome: Tabuada 
DESCRICÃO: Educativo 
CrS 5.400,00 
D/F 


10) Nome: Eliza 

DESCRICÃO: Jogo . CrS 8.400,00 
D/F 


11) Nome: Odonto K-7 
DESCRICÃO: Aplicativo 
PRECO: 30 ORTNs 
FITA 


12) Nome: Odonto Disquette 
DESCRIÇÃO: Aplicativo 
PRECO: 50 ORTNs 
DISCO 


13) Nome: Cadastro de clientes K-7 
DESCRIÇÃO: Aplicativo 
PRECO: 15 ORTNs 
FITA 


14) Nome: Cadastro de clientes - 
Disquette 

DESCRICÃO: Aplicativo 
PREÇO: 20 ORTNs 
DISCO 


15) Nome: Medicai 
DESCRICÃO: Aplicativo 
PRECO: 50 ORTNs 
D/F 


16) Nome: Diagnóstico 
DESCRIÇÃO: Aplicativo 
PRECO: 20 ORTNs 
D/F 


17) Nome: Controle de estoque 
DESCRICÃO: Aplicativo 
PREÇO: *50 ORTNs 
D/F 


18) Nome: Anamnese 
DESCRICÃO: 

PRECO: 25 ORTNs 
D/F 


19) Nome: Rede Pert 
DESCRICÃO: 

PRECO: 15 ORTNs 
D/F 


Eng. Comércio de Computado¬ 
res Ltda. 
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Av. Paulista, 1159 Cj. 611 
São Paulo - SP 
Tel.: (011) 284.1218 


SOFTWARE CP 500 

1) Nome: Méddisk 
DESCRIÇÃO: Agenda médica con¬ 
jugada com arquivo de clientes, 
(dados, consultas, exames, trata¬ 
mento, evolução). 

PR ECO: Sob consulta 

d/f' 


Monk Micro Informática Ltda. 
Rua Augusta, 2690 2? and. 
Loja 318 - São Paulo - SP 


SOFTWARE CP 500/300 

1) Nome: Data-Manager 
DESCRIÇÃO: Gerador de progs. 
aplicativos e gerenciador de banco 
de dados.' 

PREÇO: 39 ORTNs 
DISCO 

2) Nome: Easycalc Plus 
DESCRIÇÃO: Planilha eletrônica 
para cálculos. 

PREÇO: 22 ORTNs 
DISCO 

3) Nome: Contabilidade Geral 
DESCRIÇÃO: Processa contabilida¬ 
de de até 2000 contas (sint/anal). 
PREÇO: 34 ORTNs 

DISCO 

4) Nome: Contacorrente 
DESCRIÇÃO: Sistema de controle 
do recebimento de contas e crediá¬ 
rio. 

PRECO: 15 ORTNs 
DISCO 

5) Nome: Contrec III 
DESCRIÇÃO: Sistema de contas a 
receber com projeção trimestral. 
PRECO: 16 ORTNs 

DISCO 

6) Nome: CONTPAG III 
DESCRIÇÃO: Sistema de contas a 
pagar com projeção trimestral. 
PRECO: 16 ORTNs 

DISCO 

7) Nome: Mala Direta II 
DESCRIÇÃO: Cadastra, classifica e 
emite etiquetas. 

PRECO: 14 ORTNs 
DISCO 

8) Nome: SCE 

DESCRIÇÃO: Sistema de gerencia¬ 
mento de estoque até 1000 ítens/- 
arquivo. 

PREÇO: 17 ORTNs 
DISCO 

9) Nome: Budget Management 
DESCRIÇÃO: Controla o planeja¬ 
mento orçamentário, caixa, ban¬ 
cos, receita e desp. 

PREÇO: FITA 11 ORTNs 
DISCO 14 ORTNs 


10) Nome: Editex IV 
DESCRIÇÃO: Editor e processado, 
de textos. 

PREÇO: FITA 12 ORTNs 
DISCO 15 ORTNs 

11) Nome: Data-File 
DESCRIÇÃO: Banco de dados em 
fita. 

PRECO: 12 ORTNs 
FITA 

12) Nome: Pagrec 
DESCRIÇÃO: Sistema de contas a 
paga//receber com cadastro de 
cli/forn. 

PREÇO: 9 ORTNs 
FITA 

13) Nome: Cadastro de endereços 
DESCRICÃO: Mala direta em fita. 
PRECO: 9 ORTNs 

FITA 

14) Nome: Estoque I 
DESCRIÇÃO: Sistema administrador 
de estoque de lojas e pequenas em¬ 
presas. 

PREÇO: FITA 8 ORTNs 
DISCO 8 ORTNs 

15) Nome: Verban II 
DESCRIÇÃO: Controlador da conta 
bancária 

PRECO: FITA 9 ORTNs 
DISCO 11 ORTNs 

16) Nome: Adbens 
DESCRIÇÃO: Cadastramento e 
controle de locações. 

PRECO: FITA 14 ORTNs 
DISCO 19 ORTNs 

17) Nome: TPV 

DESCRIÇÃO: Cadastra, classifica e 
emite lista de preços. 

PREÇO: FITA 9 ORTNs 
DISCO 11 ORTNs 

18) Nome: VIGA 

DESCRIÇÃO: Calcula esforços, 
reações, cortantes e momentos de 
uma viga. 

PRECO: FITA 12 ORTNs 
DISCO 14 ORTNs 

19) Nome: Pórtico 
DESCRIÇÃO: Cálculo de desloca¬ 
mentos, esforços e reações num 
fjórtico plano. 

PRECO: FITA 9 ORTNs 
DISCO 11 ORTNs 

20) Nome: Cadmat 
DESCRIÇÃO: Orçamento de obras 
e banco de dados de materiais. 
PRECO: 15 ORTNs 

FITA 

21) Nome: Compilador Fortran 
DESCRIÇÃO: Use a linguagem For¬ 
tran no seu microcomputador. 
PREÇO: 19 ORTNs 

DISCO 

22) Nome: Edtasm 
DESCRIÇÃO: Editor e compilador 
Assembler. 

PRECO: FITA 9 ORTNs 
DISCO 11 ORTNs 


23) Nome: Debug 
DESCRIÇÃO: Testa e debuga pro¬ 
gramas em linguagem de máquina. 
PRECO: 9 ORTNs 
FITA 


24) Nome: Crossref 
DESCRIÇÃO: Mapa de referência 
cruzada para analisar programas em 
Basic. 

PREÇO: 9 ORTNs 
FITA 


25) Nome: Compilador Cobol 
DESCRIÇÃO: Linguagem Cobol 
para seu microcomputador. 
PREÇO: 23 ORTNs 

DISCO 

26) Nome: Bascom 
DESCRIÇÃO: Compilador Basic, 
transforma progs. de Basic para As¬ 
sembler. 

PRECO: 19 ORTNs 
DISCO 

27) Nome: Contabilidade domésti¬ 
ca 

DESCRIÇÃO: Gerenciador de des¬ 
pesas domésticas. 

PRECO: 6 ORTNs 
FITA 

28) Nome: Lotesp 
DESCRIÇÃO: Elabora estatistica¬ 
mente probabilidades de jogos da 
Loteca 

PREÇO: 6 ORTNs 
FITA 

29) Nome: Cadastro fotográfico 
DESCRIÇÃO: Cadastra e pesquisa 
fotos por qualquer chave. 

PRECO: 5 ORTNs 

FITA 

30) Nome: Cadastro de artigo de 
revista. 

DESCRIÇÃO: Cadastra e pesquisa 
artigos de revista por vários itens. 
PRECO: 5 ORTNs 
FITA 

31) Nome: Biorritmo com gráfico 
de afinidade. 

DESCRIÇÃO: Calcula e traça as 
curvas de ciclos físico/emocional/- 
intelectual. 

PRECO: 5 ORTNs 
FITA I 

32) Nome: Pacote de treinamento 
em Basic. 

DESCRIÇÃO: Sete programas que 
treinam os seus conhecimentos de 
Basic. 

PREÇO: 6 ORTNs 
FITA 


33) Nome: Game Pack 1 
DESCRIÇÃO: Pacote com seis jo¬ 
gos em Basic. 

PREÇO: 5 ORTNs 

FITA 

D/F 


34) Nome: Game Pack 2 
DESCRIÇÃO: Pacote com sete jo¬ 
gos em Basic. 

PRECO: 5 ORTNs 
FITA 

35) Nome: Game Pack 3 
DESCRIÇÃO: Pacote com dois jo¬ 
gos em Basic e dois em System. 
PREÇO: Fita 5 ORTNs 

DISCO 7 ORTNs 

36) Nome: Game Pack 4 
DESCRIÇÃO: Pacote com três jo¬ 
gos em System com som. 

PRECO: FITA 5 ORTNs 

DISCO 7 ORTNs 

37) Nome: Game Pack 5 
DESCRIÇÃO: Pacote com três jo¬ 
gos em System com som. 

PREÇO: FITA 5 ORTNs 

DISCO 7 ORTNs 


Polimicro 

Av. Androade Neves, 1254 
13100 - Campinas - SP 


SOFTWARE CP 200 

1) Nome: Controle de estoque 
DESCRIÇÃO: Controle de entra¬ 
das, saídas e saldo, mostrando rela- 
cão geral ou itens individualmente . 
CrS 9.500,00 F 

2) Nome: Arquivo 
DESCRIÇÃO: Em linguagem de 
máquina. Banco de dados contro¬ 
lando fichas em tamanho e formato 

definidos pelo usuário. 

CrS 9.500,00 F 

3) Nome: Policalc 
DESCRIÇÃO: Em linguagem de 
máquina uma versão do Visicalc 
muito poderosa e simples de usar . 
CrS 9.500,00 F 

4) Nome: Desassembler 
DESCRIÇÃO: Transforma os n?s da 
linguagem de máquina em Assem¬ 
bler do microprocessador Z-80.... 
CrS 9.500,00 F 

5) Nome: Assembler 
DESCRIÇÃO: Transforma instru¬ 
ções do Assembler Z-80 para códi¬ 
gos em linguagem de máquina .... 
CrS 9.500,00 F 

6) Nome: Letreiro 
DESCRIÇÃO: Transforma mensa¬ 
gens em letras garrafais passando 

pelo vídeo.CrS 4.500,00 

F 

7) Nome: Aviador, Batman, Black 
Jack e Caça Níqueis, Red Alert e 
Aluminsagem, Labirinto Mágico, 
Frogger, Grand Prix, Fungalóides, 
Ataque cósmico. Tiroteio e Pene¬ 
tra, Assaltantes, Batalha Naval, 
Forca, Duelo, Limonada, Taypan, 
Pimball. 

PREÇO: CrS 4.500,00 cada F/. 
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Campo Minado 



1090 1=0 
1100 1=1+1 

1110 IF I>J THEN PRINT «15*64+10," 
ENDEREÇO N00 ENCONTRADO !!! " ? : F 

OR H=1 TO 1000 :NEXTHs GOTO 1000 
112© IF E*(I>«E1» THEN GOTO 113© E 
LSE GOTO 1100 
1130 PRINT @4*64+10,N*(I ) 

1140 PRINT «6*64+10,CHR*(30)? 

1150 PRINT @6*64+10,E* (I) 

1160 PRINT @8*ó4+10,T*(I) 

1170 PRINT @10*64+10,D*(I ) 

1180 PRINT 015*64+10,"DESEJO NOVO 
CONSULTO (S/N)? "? 

1190 0*=INKEY* 

1200 IF 0$="" THEN GOTO 1190 
1210 IF 0*="S" THEN GOSUB 380 :G0 

TO 1100 

1220 IF 0*="N" THEN RETURN 
1230 GOTO 119© 

1240 ' SUB-ROTINO: ONI VERSORIONTES 
DO MES 

1250 B*="ONIVERSORIONTES" 

1260 GOSUB 120 

1270 PRINT «15*64+10,"DIGITE 0 MES 
P/ CONSULTOR "? 

1280 PRINT «2*64,"MESs "j 
1290 INPUT Dl* 

1300 IF Dl*="FIh" THEN RETURN 
1310 RESTORE 
1320 RERD 0$,M 

1330 IF 0*<>D1* THEN GOTO 1320 
1340 1=0 
1350 1*1+1 

1360 IF I>J THEN GOTO 1470 

1370 IF VPL (MID*(D*(I),4,2)) = : M THE 

N GOTO 1380 ELSE GOTO 1350 

1380 GOSUB 380 

1390 PRINT «4*64+10,N*(.T) 

1400 PRINT @6*64+10,E*(I) 

1410 PRINT «8*64+10,T*(I) 

142© PRINT @10*64+10,D*(I) 

1430 PRINT «15*64+10,"PRESSIONE EN 
TER P/ CONTINUAR."? 

1440 0*=INKEY* 

1450 IF 0$="" THEN GOTO 1440 
1460 IF fl$=CHR*(13) THEN GOTO 1350 

1470 PRINT @15*64+10,"DESEJO CONSU 
LTOR OUTRO DOTO (S/N) ?"? 

1480 0*=INKEY* 

1490 IF 0*="" THEN GOTO 1480 
1500 IF 0*="S" THEN GOTO 1260 
1510 IF P*="N" THEN RETURN 
1520 GOTO 148© 

1530 ' SUB-ROTINO: GROVOCOÜ DOS DO 
DOS 

1540 B*="GROVOCflü" 

1550 GOSUB 120 

1560 PRINT @15*64+10,"PREPARE 0 GR 
OVPDOR P/ GRPVOGOO E PRESSIONE ENT 
ER"? 

1570 0*=INKEY* 

1580 IF 0* = "" THEN GOTO 1570 
1590 IF 0*=CHR*(13) THEN GOTO 1600 
ELSE GOTO 1570 
1600 FOR 1=1 TO J 

1610 PRINT #-l,N*(I),E*(I),T*(I),D 

*(D,I 

1620 NEXT I 

1630 PRINT #-l, "FIM" ,"*","*","*",J 
1640 RETURN 

1650 ' SUB-ROTINO: LEITURA DOS DOD 
OS 

1660 B*="LEITURP" 

1670 GOSUB 120 

1680 PRINT @15*64+10,"PREPARE 0 GR 
OVODOR P/ LEITURA E PRESSIONE ENTE 
R -" ? 

1690 0*=INKEY* 

1700 IF 0*="" THEN GOTO 1690 

1710 IF 0*0 CHR* (13) THEN GOTO 16 

90 

1720 1=0 
1730 1=1+1 

1740 'IF N*(I)="FIM" THEN RETURN 
1750 INPUT #~1 ,N*(I),E*(I),TS(I),D 
*(D>J 

1760 IF N*(I)="FIM" THEN RETURN 
1770 GOTO 1730 


Quem se lembra dos filmes de guer¬ 
ra? Se você quiser relembrá-los, aqui 
vai a sua chance: o jogo que publica¬ 
mos a seguir testará a sua perícia ao 
atravessar um campo minado. Igual¬ 
zinho aos filmes da II Guerra, por is¬ 
so: todo o cuidado é pouco. Ref P 2 io 

10 ' * x- -x- x- x * * * * * * * * * x- x x x x x x x- x- x- x- x x- * * * 
2© '* COM P 0 M I N 0 D Ü * 
30 '* PROLOGIC 0 x 

40 'x CP- 500 / C P - 300 * 

50 ' * X X X X X X X X X X X X X X X X X X X X X X X X X X X X X 

60 CLSs POKE 16916,1:PRINTTOB(22)"* 
** CQMPO MINODO ***" 

70 PRINTG264,"ESTE JOGO VISO VER S 
UO PERICIO 00 ATRAVESSAR UM 
C 0 M P 0 MINADO SEM PISO 
R NOS BOMBO, 

PORO ISSO UTILIZE OS SETAS 
QUE MOVEM PORO CIMO E PORO BOIX 

0 

TUDO OK?. TECLE <ENTER> PO 
RO INICIOR. BOA SORTE!!!" 

80 P*=INKEY*:IF 0*="" THEN GOTO 80 

90 CLS 

100 BT=0:COT=1:J0G=1:VL=15:Y=24:0P 
=128sPRINT@65, "QTÜS- JOGADORES IRO 
0 JOGAR, MOX(2) " :SET(74,4):JRESET(7 
4,4) 

110 SET(74,4)sRESET(74»4):P*=INKEY 
*sIF 0*="1" OR 0*="2" THEN NJ=VAL( 
fi*):CLS ELSE GOTO 110 
120 PRINT@14*64+16," P R 0 L 0 G I 
CO - 1 9 8 3 " 

130 FOR 0=0 TO 127sSET(0,12):SET(0 
,36)sNEXTO 

140 FOR ESM=0 TO 150 
150 S=INT(RND(122)):IF S<5 THEN 15 
0 

160 ST=INT(RND(34)):IF ST<14 THEN 
160 

170 IF POINT (S,ST)=~1 THEN 150 EL 
SE SET(S,ST)sNEXTESM 
180 IFNJ=2 THEN PRINT«89,"JOGODOR 
NR- "?JOGsGOSUB 320 


Modelo CP 300/ CP 500 
16k RAM 
Basic Residente 


190 FOR C=0 TO 300sSET(0,Y)sRESET( 
0, Y): IF 0228 THEN PRINTG71+C-236 , 
" " ? "•OTENCOO" s NEXTC ELSE NEXTC 
200 PRINT@130,"LORGODO "?s 

FÜRCT =0 TO 200SNEXTCT sPRINT«130, " 

210 FOR CRR=© TO 126 
220 B*=INKEY* 

230 IF B*=CHR* (91 ) THEN Y=Y-lsIF Y 
<14 THEN Y=14 

240 IF B$=CHR*(10) THEN Y=Y+lsIF Y 
>34 THEN Y=34 

250 RESET(CRR,Y):SET(CRR,Y)s FOR VE 
L=0 TO VL:NEXTVEL:RESET(CRR,Y) 

260 IF POINT(CRR+1,Y)=-l THEN PRIN 
T@65,"BBBBBBBBBBBBBBBUUUUUUUUIJUUUU 
UMMMMMMMMMMMMMMMM!!!!!!!!!!!!!!!"s 
BT=BT+lsGOSUB 320 
270 NEXTCRR 

280 IF BT=0 THEN PRINT@75,"VOCE E 
MUITO VIVO, NOO BOTEU EM NENHUMO B 
OMBO" ELSE IF BTO0 AND BT<=4PR1NT 
«77,"NOO ESTO MAL, BOTEU EM APENAS 
"?BT?"BOMBOS" ELSE PRINTG71,"VOCE 
PRECISO TREINOR MOIS, POIS BOTEU E 
M"?BT?"BOMBOS" 

290 GOSUB 320 :TBT < JOG)= TBT(JOG) + 

BT uBT=0:VL=VL-5 s C0T*C0T+1sIF COT <2 
THEN RONDOM r, CLS : GOTO 130 
300 IF TBT(JOG)=0 THEN CLSsPRINT@5 
27,"PORPBENS, VOCE NOO BOTEU* NENHU 
MO VEZ"ELSE CLSsPRINT@526, "Nü TOTO 
L VOCE BOTEU EM"?TBT(JOG)?"BOMBOS" 
310 FOR MN=0 TO 300:NEXT MN:JOG=JO 
G+l:VL=15:IF JOG>NJ THEN RUN ELSE 
CLS:GOTO 130 

320 FOR T=0 TO 500:NEXTT:FOR BR=0 
TO 64:0P=PP-1s RESET( BR ,3)s RESET(OP 
,3) :NEXTBR s 0P=128sRE.TURN 
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O Micro na Educação 



A crescente utilização da 
informática na sociedade é 
um fato: indústrias, bancos, 
escritórios, emissoras de 
TV, bibliotecas computari- 
zadas pertencem ao cotidia¬ 
no de todos nós. Sendo a es¬ 
cola um lugar por onde pas¬ 
sam interesses sociais e polí¬ 
ticos e onde as necessidades 
da coletividade se refletem, 
o uso do computador no en¬ 
sino tem agitado professores 
e psicólogos na busca de de¬ 
finições para a introdução dessa tec¬ 
nologia no 1? e 2? graus. 

No Brasil, foi em 1981 que pela pri¬ 
meira vez um grupo de educadores se 
reuniu para discutir a questão, duran¬ 
te seminário promovido pelo MEC, 
CNPq e Secretaria Especial de Infor¬ 
mática. Do encontro, restaram propo¬ 
sições: não-substituição do professor 
pela máquina; consideração dos valo¬ 
res culturais e sócio-políticos de cada 
região do País; prioridade para os as¬ 
pectos pedagógicos e educacionais so¬ 
bre os aspectos técnicos; implantação 
da informática na rede estadual de en¬ 
sino sem derivação de verbas da edu¬ 
cação básica. 

Recentemente, em encontro promo¬ 
vido pela Universidade Federal do 
Rio de Janeiro, o titular da Secretaria 
Especial de Informática, Joubert de 
Oliveira Brízida, afirmou que a SEI 
está tentando realizar uma experiên¬ 
cia voltada à educação computarizada 
e, depois de concluída, a oferecerá pa¬ 
ra ser aplicada nas redes pública e 
particular. Para essa experiência, a 
Secretaria estaria selecionando cinco 
projetos, num total de 18, realizados 
por universidades para a informatiza¬ 
ção do ensino. 
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Escolas Particulares 

Enquanto não se tem algo mais 
concreto sobre a utilização do compu¬ 
tador na rede pública, muitas escolas 
particulares estão introduzindo o 
computador como ferramenta de ensi¬ 
no, no 1? e 2? graus. Em São Paulo, 
vários são os colégios: Bandeirantes, 
Objetivo, Sagrado Coração de Jesus, 
Rio Branco, Benjamin Constant, 
Brasil-Europa, Renascença, Santo 
Agostinho, Santo Américo. 

Um dos responsáveis pela introdu¬ 
ção do computador em algumas des¬ 
sas escolas é o Cenadim — Centro de 
Desenvolvimento da Informática, que 
oferece aos colégios de 1? e 2? graus 
cursos de Iniciação ao Microcomputa¬ 
dor e Introdução à Programação. 
Recebendo inscrições de crianças a 
partir dos oito anos, a experiência do 
Centro é, no mínimo, inovadora: o 
Cenadim fornece os micros, apostilas 
e professores e as escolas as instala¬ 
ções físicas. 

De acordo com Alexandre Leite 
Werfel, diretor do Cenadim, este siste¬ 
ma de cursos — iniciado em janeiro de 
1983 — vem dando certo: o Centro já 


treinou mais de 500 crianças 
e atualmente está dando su¬ 
porte de implantação de sis¬ 
temas em alguns colégios. 

“Os resultados que obti¬ 
vemos com nossa experiên¬ 
cia têm sido excelentes: as 
crianças aprendem a lidar 
com o computador numa 
velocidade espantosa e se in¬ 
teressam fundamentalmente 
pela parte prática do apren¬ 
dizado”, afirma Werfel. E 
acrescenta: “Percebemos 
também que a maioria dos alunos pas¬ 
sa a estudar muito mais as matérias 
curriculares, para poderem desenvol¬ 
ver programas nos micros — já que 
nós sempre procuramos voltar o com¬ 
putador à vida escolar do aluno”. 

ção. O programa tem cinco níveis de 
dificuldades e gera aleatoriamente 
dois números inteiros, um para divi¬ 
dendo e outro para divisor. E necessá¬ 
rio que a criança forneça o quociente e 
o resto da divisão. Se a resposta for 
correta, o aluno marca um ponto. Ca¬ 
so contrário, é explicado como a divi¬ 
são deveria ter sido efetuada. O pro¬ 
grama se utiliza de um método sim¬ 
ples e de fácil aprendizagem. 

Neste contato com as escolas os 
professores e orientadores do Cena¬ 
dim constataram que 70% das crian¬ 
ças vêem o computador como uma 
ferramenta de trabalho que depende 
fundamentalmente do programador. 
“Se há alguma resistência â introdu¬ 
ção do computador no ensino”, ga¬ 
rante Werfel, “ela está ligada à falta 
de verbas do MEC e à completa de¬ 
sinformação de alguns professores que 
têm o microcomputador como um 
fim, não um meio”. Ref P 2 ii 








EDUCAÇAO 


A Experiência do Objetivo 

Depois de muita pesquisa e desen¬ 
volvimento de um projeto que levou 
um ano e meio para ser elaborado, 
João Carlos Di Gênio, diretor do Cen¬ 
tro Educacional Objetivo, resolveu 
adotar o computador como ferramen¬ 
ta de ensino. 

Atualmente, o Objetivo está utili¬ 
zando 115 micros, entre eles vários 
CPs da Prológica. Nesta fase inicial 


de implantação do sistema, o investi¬ 
mento feito pela diretoria do colégio 
chegou a Cr$ 758 milhões, sendo que 
uma grande parcela dessa quantia foi 
gasta em recursos humanos. 

Os computadores instalados no Ob¬ 
jetivo estão sendo usados para ensino 
da linguagem Logo, na pré-escola e 
primeiras séries do 1? Grau, e para 
o ensino de programação para alunos 
a partir da 7? série e do 2? Grau. 
No cursinho os computadores estão 


Programa GP 


A partir deste número de Geração 
Prológica passaremos a publicar sem¬ 
pre um programa educativo. Abaixo, 
a listagem do Divisão que mostra ao 
aluno qual o significado desta opera¬ 
ção. Este programa tem cinco níveis 


10 '**************•**-*•*■*■**■■*-**■-**•■*-*•** 
20 -* D I V I S A ü * 

30 •"* P R 0 L 0 G I C R - 1933 * 
40 CP 2 0 0 * 

50 ''*********************-***■*-**•*** 
60 RAND 
70 GOSUB 1060 

30 PRINT AT 2,10;"10 DIVISÕES" 

90 PRINT AT 4,2;"QUAL 0 GRAU DE DI 
FICULDADE?" 

100 PRINT AT 7,7;"1. FÁCIL" 

110 PRINT AT 9,7;"2. NAO MUITO FAC 
IL" 

120 PRINT AT 11,7;"3. MEDIO" 

130 PRINT AT 13,7;"4. UM POUCO DIF 
ICIL" 

140 PRINT AT 15,7;"5. DIFÍCIL" 

150 PRINT AT 13,2;"ESCOLHA 0 NUMER 
0, <ENTER>" 

160 INPUT N 

170 IF N<1 OR N>5 THEN GOTO 150 
ISO LET W—0 
190 LET X=0 

200 LET A=INT ((4*RND > +4*N) 

210 LET B=INT (<6*RND+1)*N*3) 

220 LET W=W+1 
225 LET C=0 
230 CLS 

240 IF W>10 THEN GOTO 370 
250 PRINT"ESTA E A QUESTÃO ";W 
260 PRINT"VOCE ACERTOU ";X;" ATE A 
30RA" 

270 LET T=11 

230 IF A<10 THEN LET T=10 
290 PRINT AT 6,T;"*****" 

300 LET W$=STR* B 
310 LET 0=LEN(W$) 

320 PRINT AT 5, T-0; B; ; A. 

330 INPUT Z 

340 PRINT AT 7,T+1;Z 

350 IF Z=B/A OR STR$(Z)=STR$(B/A) 

THEN GOTO 330 

360 IF INT ZOZ THEN GOTO 410 


de dificuldades e gera aleatoriamente 
dois números intéiros, um para divi¬ 
dendo e outro para divisor. E necessá¬ 
rio que a criança forneça o quociente e 
o resto da divisão. Se a resposta for 
correta, o aluno marca um ponto. Ca¬ 
so contrário, é explicado como a divi¬ 
são deveria ter sido efetuada. O pro¬ 
grama se utiliza de um método sim¬ 
ples e de fácil aprendizagem. 


370 PRINT AT 7,T+5;"REST0="; 

330 INPUT Y 
390 PRINT Y 

400 IF Z=INT(B/A) AND Y=B-(INT(B/A 
)*A) THEN GOTO 330 
410 PRINT"ERRADO" 

420 GOSUB 1000 
430 CLS 
440 LET C=1 

450 PRINT"AQUI E3TA0 ";B;" PONTOS" 
460 PRINT"DISTRIBUÍDOS EM LINHA DE 
" ;A 

470 PRINT 

430 FOR J=1 TO INT(B/A) 

490 FOR 1=1 TO A 
500 PRINT"*"; 

510 NEXTI 
520 PRINT 
530 GOSUB 1030 
540 NEXTJ 
550 GOSUB 1030 
560 PRINT 
570 PRINT 

530 FOR J=1 TO B-(INT(B/A)*A) 

590 PRINT"*"; 

600 NEXTJ 
610 PRINT 

620 PRINT"QUANTAS LINHAS DE ";A;" 

? " ; 

630 INPUT Z 

640 IF Z< >INT(B/A) THEN GOTO 410 
650 PRINT Z 
660 PRINT 

670 IF INT(B/A)=B/A THEN GOTO 770 
630 GOSUB 1000 

690 PRINT"CORRETO,QUANTOS RESTARAM 

720 INPUT Z 
730 PRINT Z 
740 GOSUB 1000 
750 PRINT 


sendo usados para o ensino de várias 
matérias. 

Também está sendo instalado no 
Centro Educacional Objetivo o Dida¬ 
ta 16, da Prológica. 0 Acessório vai 
permitir interligar um CP 500 com até 
16 CPs 300 ou CPs 500, sendo que o 
professor passará a ter acesso direto 
ao aluno e poderá manter diálogos en¬ 
tre micros. Para desenvolver o Didata 
16 a Prológica investiu uma quantia 
de Cr$ 50 milhões. 


Modelo: CP 200 
16K RAM 
Basic Residente 


760 IF Z< >B-(INT(B/A)*A) THEN GOTO 
410 

770 CLS 

730 PRINT AT 6,9;"CORRETO" 

790 GOSUB 1000 

300 PRINT AT 10,4;"TENTE NOVAMENTE 

310 GOSUB 1000 
820 GOTO 230 

330 PRINT AT 11,3;"CORRETO" 

340 IF C=0 THEN LET X=X+i 
350 GOSUB 1000 
360 GOTO 200 

370 PRINT"VOCE ACERTOU ";X;" DE 10 
330 PRINT 

390 PRINT"DESEJA CONTINUAR?" 

900 INPUT ZS 

910 IF CODE(Z$)< >C0DE <"S") THEN GO 
TO 970 

920 IF X>7 THEN LET N=N+1 
930 IF X<6 THEN LET N=N-1 
940 IF N<1 THEN LET N=1 
950 IF N>5 THEN LET N=5 
960 GOTO ISO 
970 PRINT 

930 PRINT"OBRIGADO PELA COMPANHIA" 
990 STOP 

1000 FOR 1=1 TO 50 

1010 NEXTI 

1020 RETURN 

1030 FOR 1=1 TO 30 

1040 NEXTI 

1050 RETURN 

1060 PRINT AT 0,0;"*************** 
*******■*■*■*•****■*■#■*" 

1070 FOR 1=1 TO 20 

1030 PRINT TAB(0);"*";TAB(31);"*" 

1090 NEXTI 

1100 PRINT AT 21,0;"************** 
***************•***" 

1110 RETURN 
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Conhecendo os CPs 


4 Porta de I/O (1? Parte) 


Marcos Lederman 


Nem sempre o usuário do CP 500 
conhece as inúmeras aplicações exis¬ 
tentes para seu equipamento. Não es¬ 
tamos falando de programas aplicati¬ 
vos, mas sim da utilização da porta de 
I/O (entrada e saída) do micro. 

A porta de I/O é na realidade uma 
extensão do barramento interno do 
computador, só que a este estão im¬ 
plementadas funções de comando que 
permitem um acesso mais fácil através 
do software, possibilitando assim a li¬ 


beração de dados, a leitura e até mes¬ 
mo condições de interrupção. 

As aplicações existentes para a por¬ 
ta de I/O são as mais variadas, a co¬ 
meçar de um joystick até uma interli¬ 
gação a um conversor analógico-digi¬ 
tal, para monitoração e controle de 
motores. 

Descrevemos abaixo os pinos da 
porta de I/O e suas respectivas fun¬ 
ções. 

Descritivo dos Pinos 

De AO a A7 — Barramento de endere¬ 
ços de I/O; número máximo de com¬ 


binações 128 (de 0 a 127). As restantes 
são reservadas para uso do sistema bi¬ 
direcional. 

De DO a D7 — Barramento de dados. 
No momento de um comando OUT 
112, 12 teremos: 

DO Dl D2 D3 D4 D5 D6 D7 
0 0 1 1 0 0 0 0 
EXTIOSEL — Pino de entrada com a 
função de bidirecionar o barramento. 
0 - Entrada 
1 - Saída 

Tri State - Saída (resístor Pull-up) 

IN — Sinaliza a execução de uma ope¬ 
ração de leitura. Resultante dos sinais 
IORQ com READ da CPU (saída) 
OUT — Sinaliza a execução de uma 
operação de escrita. Resultante dos si¬ 
nais IORQ com WRITE da CPU 
(saída) 

RESET — Sinaliza a condição de ini¬ 
cialização da CPU através do Reset 
(saída) 

Ml — Sinaliza o ciclo de máquina pri¬ 
meiro no qual está sendo efetuado o 
OPCODE FETCH; ou para um reco¬ 
nhecimento de interrupção juntamen¬ 
te com IORQ 

IORQ — Sinal de requisição do bar¬ 
ramento através de um dispositivo ex¬ 
terno, causando desta forma a entra¬ 
da dos pinos da CPU em Tri State, o 
que possibilita o controle do barra¬ 
mento. 

IOBUSWAIT — Sinal de entrada pa¬ 
ra fins de geração de um estado de es¬ 
pera por parte da CPU. 

IOBUSINT — Sinal de entrada para 
fins de geração de um estado de inter¬ 
rupção na CPU, sempre que esta não 
estiver mascarada. Esta saída normal¬ 
mente está desabilitada. Para sua ha¬ 
bilitação é necessário executar a ins¬ 
trução: OUT 236,241. Desta forma, o 
barramento de I/O estará pronto para 
enviar ou receber dados. Ref m 214 


17 — 

A0 — 


19 — 

Al 


21 — 

A2 


23 — 

A3 

— Saídas de Endereçamento 

25 — 

A4 


27 — 

A5 


29 — 

A6 


31 — 

A7 _ 


RD 


(os pinos pares são aterrados) 

ou 

-L 

1 — 

D0 — 


3 — 

Dl 


5 — 

D2 

— Entrada/Saída de Dados 

7 — 

D3 


9 — 

D4 


11 — 

D5 


13 — 

D6 


15 — 

D7 _ 


43 — 

EXTIOSEL - Entrada 

33 — 

IN 


35 — 

OUT 


37 — 

RESET 


odiucJo uc uuniruuí 

47 — 

Ml 


49 — 

IORQ _ 


41 — 
39 — 

IOBUS WAIT “I . „ . _ „ 

IOBUS INT J“ EntradaS de COntr ° le 
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Caçada ao 


Modelo CP 300/CP 500 
16K RAM 
Basic Residente 


Com este jogo, você e sua turma 
(dentro do jogo) vão tentar cercar dois 
porquinhos que escaparam do chiquei¬ 
ro. Para cercá-los, você deve movimen¬ 
tar seus amigos através do pasto e en¬ 
costar os porquinhos a um cacto, uma 
cerca, uma rocha ou segurá-los entre 
duas pessoas. Quanto maior o nível de 
dificuldade (de 0 a 15), menos obstácu¬ 
los vão ser encontrados no pasto. 

Ref. P 212 


10 •' X- X X X X X X X X X X X X X X X X X X X X X X X X X X X X X 

20 '* CR P T U R PI N D 0 x 

30 '* PORQUINHOS * 

40 ' x C P 300 / 300 x 

50 ' XX X X X XXX X X XXXX X X X X X XXX X X XX X X XX 


60 CLERR5003CLSsPRINT<!i464,""?:IF P 
EEK(275) 0500=253 s K=214 s L.= 3.95 s W=22 
2:S=254:N=19ósGGT0 210 EL SE 0=120 
s K=42 s L=43s W=89 : N=35 : S=111:GOTO 21 
0 

70 CLSsPRINT@460, "" ? 3 JNPUT"ESCOLHR 
SE NI9EL:<0=DIFICIL / 15=FRCIL)"? 
LOsIF LO<0 OR L0>15 THEN GOTO 70 
ELSE CLS : PRINT@65,STRXNG*(11,13i) 
;sPRINT@0,STRING$(64 , 176)?sFOR 1 = 1 
TO 14 s PÜKE 15360+ 1,191POKE15423+I 
,191s NEXTI 

80 PRINT®0rNh$5 ,, „ . .. " ?HS$? sPFUNTtí96 
0,STRING$(63,131)? sPOKE16383,131:P 
RINTÔ91, STR ING$ (7,131) ? s FOR 1 = 1 T0 
10 s P <I)=15834+1sPQKEP<1),OsNEXTI: 
vJ=1: POKE 16919,0s POKE 16920,0 
90 H=<RND<3)-2)*64sIF H=0 GOTO 90 
ELSE R= 15424+ (RND (12)) «-64 3 FOR 1 = 
1 TO RND<18)+8sPOKER+I,LsIF 1=6 OR 
1=7 THEN F : *OKER+1,32sNEXTI ELSE NE 
XTIsR=R+I-lsFOR 1=1 TO 13sR=R+HsIF 
PEEK(R)=32 THEN POKER,LsNEXJI ELS 
E NEXTI 

100 FOR 1=1 TO 2:8(1)=15420+RND(90 
0) sIF PEEK(8(1))032 THEN GOTO 100 
ELSE NEXTI 

110 FOR1=1 TO RND(LO*20)+10sR=1542 
0+RND(900) s IF PEEK(0)0-32 NEXTI EL 
SE POKEO, Ws NEXTIs FOR 1 = 1 TO RND(5* 
LO)+5:R=15420+RND(900)sIF PEEK(R)< 
>32 THEN NEXTI ELSE POKEO,K3NEXTI 


Porco 



120 FOR F=1 TO 2:H=B(F):Z=RND < 4):I 
F Z=1 THEN 8=(F)=H+64 ELSE IF 2=2 
THEN B(F)=H-64 ELSE IF Z=3 THEN B( 
F)=H+1 ELSE B(F)=H-1 
130 H(F)=HsNEXTF:PRINT028,RIGHT$(T 
IME*,5)? sPO=P(J > sX=PEEK(14400)sIFX 
=0GQTÜ1 40 ELSEIFX=64P(J)=P(J)+1:G 
OTO140 ELSEIFX=32P(J)=P(J)-1sGOTO 
140 ELSEIFX=16P(J)=P(J)+64 s GOTO!4 
0 ELSEIFX=8P(J)=P(J)-643 GOTO140 
ELSEIFX=128P0KEP(J),0:J=J+lsIFJ=11 
J=1 3 PO=P(J)sELS#r#h 
140 FOR 1 = 1 TO 2: IF PEEK(B(I))032 
THEN B(I)=H(I)8NN=NN+1s POKE B(I), 
N 3NEXTI ELSE POKEB(I),NsPOKEH<I),3 
2:NN=0 3 NEXTI 

150 IF PEEK(P( J) )032 THEN P(J)=PO 
:POKEP(J),S ELSE POKEP(J),S3POKEPO 
,32 

160 IF NNC50 THEN GOTO 120 ELSE E 
$=RIGHT $(TIMES,5) 

170 0=00L(LEFT$(E$,2))sIF HM>0 THE 
N T=2 ELSE IF HM=R RND H8>9flL(RIGH 
T*(E$,2))THEN T=2 ELSE T=1 
180 J$=INKEY$ s H=0 s R=VRL (LEFT$(E$,2 
)):B=VRL(LEFT*(E$,2))sIF HM<0 OR H 
M=R RND HSCB THEN GOTO 200 ELSE G 
OSUB250 sPRINT0464,^9OCE ULTRRPRS 
SOU d RECORD R líifÍL ,T ? íTPRINT«528 7 “pn 
R^FHOOR ESCRE9H SURS INICIRIS"? sPR 

M=fl: HS=B: HS*=£* :: NM$=h 


190 I$=INKEY$ s IF 1*="" THEN 190 E 
LSE H=H+1 : IF H=3 THEN PRINTG606+H, 
I$?:NM*=Nh*+I$sGOTO 200 ELSE NM*= 
NM$+I$sPRINT@606+H, 1$ GOTO 190 
200 PR INT0972, "F : ‘RESS IONE <BRRRR DE 
t.SPOCO> PRRR INICIAR"? s IF INKEY$= 
" "THEN GOTO 70 ELSE GOTO 200 
210 CLS:PRINT023, " PROLOGICR - 198 
3" ? 3PRINT@91,"C U R R R L"sPRINTtf1 
50,STRING$(19,131)?:PRINTTRB(15)" 

GUIRNDÜ 

SUR TURMR TENTE CRPTURRR (2) PORO 
UINHOS QUE FUGIRRM"?:PRINTTRB(5)ST 
RING$(59,131)?sFOR 1=1 TO 103POKE1 
5700+1,V:NEXTI 

220 PRINT0352,"<==R TURMR"3P0KE157 
66,N s POKE15773,N s PRINT$416,"<==0S 
SEL90GENS PORQUINHOS"?sFOR 1=2 TO 
10 STEP 2: POKE 15827+1, K s NEXT I r. PRI.N 
T0480,"<==ROCHRS"?sFOR 1=1 TO 9 ST 
EP2: POKE 15892+1, W: NEXTI s PR J NT0544 , 

1 >=CRCTO"?sFOR 1=1 TO 10sPOKE 159 
56+I,LsNEXTI 

230 PRINT0608,"<==CERCR"? 

240 POKE16022,V sPOKE16150,9s POKE16 
085,9:POKE16007,9 sPOKE16086,N 3 POKE 
16028,L:POKE16092,KsP0KE16156,W 3 PO 
KE16093,NsPOKE16094,9sPOKE16029,9s 
POKE 16157,9: PR INT(§736, "<==R CRPTUR 
R" ? s HS=59 s HM=59: NM$=" #•:<••*" sHS$=" '° : 
59":GOTO 200 

250 CLSsPRINT@215,"PROLOGICR - 198 
3" ;:RETURN 


ERRATA n? 1 
Geração Prológica 

Nos programas Orçamento 
Doméstico, Jogo da Forca e 
Golf, GP n? 1, págs. 2 a 4, 
pág. 13 e pág. 14, respectiva¬ 
mente, devem ser efetuadas as 
seguintes alterações: 


1 ' ORÇAMENTO DOMESTICO 

2 ' *****##«**#***»**«# 


250 FRIN1 AT 0,6;"0RCAMENT0 DOMESTICO"; 

610 PR INT AT B+4,0; I+Z;TAB 2;D$<I+Z); 

1060 PRINT AT 4,0;”QTD DESPESA= 

1270 PRINT AT 21.10;" 

1510 PRINT AT D+4, 0;1;TAB 2;L*<I);TAB 20;M(I) 
1680 LET R=R+V<I+Z) 

1980 PRINT AT 21,10;" 

2020 PRINT AT B+4,0;I;TAB 2;D$<I);TAB 20;V<I) 
2140 LET D=1 

2175 IF C=13 OR C=26 THEN LET D=1 
2285 PRINT AT 21,0;" 

2340 IF G<=13 THEN LET J=G+4 
2370 PRINT AT J,0;" 

2630 PRINT AT J,0;H;TAB 2;L»(H) 

2770 PRINT AT 4,13;R 
2775 PRINT AT 6,13;TP 
3090 LET R==R+W(I) 


1 ' GOLF 

2 ' **** 

4 ' 

210 LET Y=20-F*T+T«T 
260 NEXT T 

390 FRINT AT 6,4;.;H;" TACADA(S) E UMA NO ALUO" 

400 IF H>1 THEN PRINT AT 8,9;"HUIT0 BEM... 


1 ' JOGO DA FORCA 

2 ' #»*«***#«**** 

3 ' 

4 ' 

750 POKE 16437,255 
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Piano no CP 500 


Modelo CP 300/CP 500 
16K RAM 
Basic Residente 


Este programa transforma o tecla¬ 
do do seu CP 300 ou CP 500 em um 
teclado musical. Cada tecla fará soar 
uma nota diferente. Para executá-lo 
no CP 300 ou 500 sem disco, você de¬ 
verá fazer algumas modificações, co¬ 
mo é indicado no início do programa. 

Ref. P 213 


j. ' X* X X X K X X * X X K X -X X X X X X X X X X X X X X X X X X X 

2 ' * x 

3 '* P 1 fl N 0 D o cp 500 x 

4 •' x x 

5 '# PROLOG 3! CP - 19 «3 X 

6 ' x x 

7 '*< x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x 

8 ' P a r a e x f? c u t a r e s t e p r o g r a m a n o 

C f-300 x cl e v e m o •:> f a 2 0 r a 1 g u - 

m a s m o ct i f i c a c o e 5 s 

9 ' 1.) 0 linha 30 deve s»er modif.it: 
a cl a para s 

30 POKE 16526,0:POKE 16527 

x 125 

2.) P linha 190 deve ser rnodif 
içada para 

190 X=USR<Y) 

10 CLS s CLP RR 1000 ü S*«STR 1 NG* < 63 * ,l * ,l 
) 

20 PR 1 NT0448, S* ? 0532 x 11 PX FINO ELETRO 
N ICO"? 0576»S$ 

30 DEFUSR1«&H7D00 
40 ÜEFINTR-ZsDIM B(128) 

50 FOR X- : 32000 TO 32023sRERD RsPQK 
E XxRsNEXT X 

60 D Ff í‘Pl 203 r 127 r 10 r 14.255» 221^33» 2 
35 

70 D PT Ff 56x237x89x69x16x254x28x203 
x135x175 

80 DRTR 221r190,0x280x24x241 
90 RERDBC8>r8(9)xB <10),B(13)xB(31) 
10 8 F 0 R X * 4 4 T059 r. R E fl D B < X ) & N E X T X 
110 F0RX--64T091 s RERDB < X) s NEXTX 
120 DRTR 25x26x27x38x39x47x12x48x4 
9x10 

130 DRTR 1x2x3x4x5x6x7x8x9x11x37x2 
4 x 28 

148 DRTR 44 x 42 x 30 x 16 x 3 *-2 x 32 x 33 r 21 x 
34x 33x 36 

150 Df-lTP 46x45x22x23x14x17x29x18x2 
0/43x15x41x19x40x13 
160 R*«INKEY$ n IFR*« M,, THEN160 
170 R«RS.C (R* ) s C*B C R) 

180 Y" : 250“-.t 9-xC 
190 X- s USRl (Y ) 

200 GOTO168 



micros] 

ASSESSOR1A EM PROCESSAMENTO DE DADOS 

A FUSÃO ENTRE A CIÊNCIA E A CRIATIVIDADE 
Software para CP 200 - CP 300 - CP 500 

Jogos e aplicativos 

Área odontológica - controle de consultório - clientes - atividades 
programa Odonto clínicas - odontograma - orçamento, etc... 

programa - evolução clínica - alergias - traumas - 

ANAMNESE diagnóstico, etc... 

Área médica - controle de consultório - clientes - evolução 

programa Medicai clínica - projeção 
de valores 

Programa - localização de doenças por sintomas e vice- 

DIAGNÓSTICO versa. Emissão automática de receitas 



Aplicativos Gerais - cadastramento, consulta seletiva, emissão de 
Cadastro de mala direta seletiva, editor de textos voltado 

clientes e criação de mala direta, etc... 


Estoque/ 

Inventário 

permanente 


variações de preços, variações de estoque, 
preços médios, relação de lucros, lista 
de preços, etc... 


Rede Pert - cálculo da rede, caminho crítico, estatísticas 

etc... 

Contas a pagar, Contas a receber, 
Contabilidade Geral, etc... 


Peça demonstração em qualquer dos nossos 
revendedores. 


Av. Indico , 30 - 7? andar - s. 73 
S. Bernardo do Campo - S.P. - CEP 09700 
Te!.: 448.6234 
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DICAS 


Agilizando 
a Digitação 


Quando você está digitando um 
programa no seu CP 200 e a tela fica 
repleta, as inclusões posteriores de no¬ 
vas linhas levam um tempo maior pa¬ 
ra serem efetivadas. Se você quiser 
agilizar a sua criação de linhas na di¬ 
gitação, basta que você inclua estas 
três linhas no seu programa: 

10 REM x-x-xx-x-x-x- QRTR xxx 
20 LET PONTO-l 

Toda a vez que a tela ficar cheia, te¬ 
cle RUN que automaticamente uma 
nova tecla será aberta para se conti¬ 
nuar a digitar o programa. 

Não esqueça de retirar estas três li¬ 
nhas do programa após ele estar pronto. 


Utilizando o 
Programa TAPE 


Quando queremos copiar uma fita 
SYSTEM ou um arquivo NOMARQ/ 
CMD para fita cassete, devemos utili¬ 
zar o programa TAPE, que é forneci¬ 
do junto com o DOS 500. Vamos pri¬ 
meiro abordar a opção de transferên¬ 
cia de uma fita para disco. 


Quando aparecer a mensagem: 
DOS 500 Ativo 

digite TAPE (S=T, D=D) e pressio¬ 
ne ENTER. Aparecerá a mensagem: 
Cass? 

Pressione então A ou B, de acordo 
com a velocidade em que estiver gra¬ 
vada a fita. Se ela foi gravada com 
1500 baud, pressione A. Se a velocida¬ 
de for de 500 baud, pressione B. Em 
seguida, aparecerá a mensagem: 
Cópia de Fita > Disco 
Digite QQ Tecla quando Cassete OK 

Posicione a fita no início do progra¬ 
ma a ser lido, pressione a tecla PLAY 
do gravador e aperte qualquer tecla 
do CP 500. O computador começará a 
ler a fita e gravará o programa em dis¬ 
co, com o mesmo nome encontrado na 
fita, colocando a extensão /CMD no 
nome do arquivo. 

Após a gravação aparecerá nova¬ 
mente a mensagem: 

DOS 500 Ativo 

Se você usar agora o comando 
DIR, verá que foi criado um novo ar¬ 
quivo com a extensão /CMD. 

Para usar o programa, gravado em 
disco, basta digitar o nome do arqui¬ 
vo, sem a extensão /CMD, e pressio¬ 
nar ENTER. Não se esqueça que isto 
deve ser feito logo após a mensagem: 
DOS 500 Ativo. 

Se o programa eventualmente não 
for executado, é provável que este te¬ 


nha áreas de conflito com o sistema 
operacional e não possa funcionar se o 
disco não for desativado. 

Vamos agora transferir um progra¬ 
ma do disco para a fita. 

Primeiro, devemos digitar TAPE 
(S=D, D=T) e pressionar ENTER. 
Aparecerá a mensagem: 

Cass? 

Pressione A ou B, como foi descrito 
anteriormente. Em seguida, aparece¬ 
rá: 

Cópia de Disco > Fita: Esp. Arq.? 

Digite o nome completo do arquivo, 
inclusive a extensão que deve 
ser /CMDe pressione ENTER. En¬ 
quanto o computador lê o arquivo do 
disco para a memória, posicione a fita 
no início da parte útil e pressione as 
teclas PLAY e RECORD do grava¬ 
dor. Após aparecer a mensagem: 
Digite QQ Tecla quando Cassete OK 
pressione ENTER e aguarde até que 
apareça novamente a mensagem: 

DOS 500 Ativo. 


Read, Data e 
Restore para o CP 200 


Com uma pequena sub-rotina você 
terá a possibilidade de simular o con¬ 
junto de instruções que publicamos 
abaixo, só disponíveis em micros de 
porte maior. Ret. m 215/M 216/M 217 


O Mappin garante o que vende. 

Aberto das 8 às 24 horas, 
inclusive aos sábados. 

No Mappin você encontra 
toda a linha de Computadores 
Pessoais Prológica. 

Dois endereços para sua comodidade: 
Centro 

Pça. Ramos de Azevedo, 120 

Fone: 258-4411 

Jardins 

Av. Cidade Jardim, 73 
Fone: 881-1144 


30 LET D*="PI,2.3459,3,4,5*PI,45,Í 
23,98,3.141592.10" 

40 FOR J=1 TO 10 
50 GOSUB 1000 
60 LET X=RERD 
70 PRINT TRB 10,X/PI 
80 NEXT J 

1000 REM x****** RERD ******* 

1010 LET H$="" 

1020 IF P0NT0=LEN D$ THEN STOP 
1030 IF D*(PONTO)O "," THEN LET H 
$=H$+D$(PONTO) 

1040 LET P0NT0=P0NT0+1 

1050 IF D$(PONTO)<> THEN GOTO 

1030 

1060 LET RERD=VRL H$ 

1070 RETURN 
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Programa 
do Usuário 


No primeiro número de Geração 
Prológica, pedimos a nossos leitores 
que nos enviassem sugestões e colabo¬ 
rações. O nosso pedido foi atendido: 
além de várias cartas recebemos tam¬ 
bém alguns programas, entre os quais 
O Invasor, de Henrique Monteiro 
Cristóvão, 15 anos, aluno da Escola 
Técnica Federal do Espírito Santo. 

Desde já agradecemos a Henrique 
por sua colaboração e aproveitamos 
para avisar que bimensalmente estare¬ 
mos lhe enviando um exemplar de Ge¬ 
ração Prológica. Publicamos abaixo 
o texto da carta de Henrique e a lista- 


1 R E M * * * x * x x x x x x x x x x x x x x x x x x x x x x x x 

2 REM I N V R S 0 R x 

3 REM PROLOG I CR* 

4 REM C P - 2 0 0 x 

5 REM x x x x x x x x x x x x x x x x x x x x x x x x x x x x x 
10 REM HENRIQUE M» CRISTOVRO 

20 REM CP - 200 PROLOGICR 
30 GOTO 490 
40 FOR L-U TO 19 

50 LET X=X+ (INKEY$="8" RND X<26)-< 
.1 NKEY$="5" AND X>3) 

60 PRINT RT 19 7 X ?"~ I 
70 LET C=C+R(L) 

80 PRINT RT L-lrC-1;" 

90 PRINT RT L r C;" 0 " 

100 IF INKEY*="0" THEN GOSUB 160 
1.10 NEXT L 
120 LET F=F-1 
130 LET Z=0 

140 IF F<=0 THEN GOTO 895 
150 GOTO 790 

160 FOR M=17 TO L STEP -2 
170 PRINT RT M» X+l? " . " 

180 PRINT RT M-fZrX + l?" " 

190 NEXT M 

200 PRINT RT M+2 r X + l?" " 

210 IF C=X + 1 THEN GOTO 230 

220 RETURN 

230 FOR K=1 TO 20 

240 FRST 

250 SLOW 

260 NEXT K 

270 FOR K=1 TO 5 

280 PRINT RT L, C~1 ; "BUM"?RT L,C-1? 
" BUM " 

290 NEXT K 
300 LET Z=1 

310 LET J=10*(INT (1/<L+10)*1000)) 
320 PRINT RT L,C-1?J 
330 LET H=C 
340 LET P=P+J 


gem do Invasor. 

“Em primeiro lugar, eu queria saber 
o que é necessário fazer para receber re¬ 
gularmente a revista Geração Prológi¬ 
ca. Em segundo, gostaria de comunicar 
que, em anexo a esta carta, estou en¬ 
viando um programa de minha autoria, 
O Invasor, desenvolvido num CP 200. 

Neste programa, você, com o seu fo¬ 
guete aterrisado na base, tem de acertar 
o Invasor — que aparece e desce aleato¬ 
riamente na tela — antes que ele invada 
a base. Os pontos são feitos de acordo 
com a altura em que o Invasor é almeja¬ 
do, ou seja: quanto mais alto você atirar 

350 G08UB 880 

360 IF P>=6 THEN GOTO 390 

370 LET U=U+1 

380 GOTO 790 

390 LET J=500*F 

400 PRINT RT 10716?J 

410 FOR K=1 TO 30 

420 PRINT RT 10 7.10?" BONUS " ? RT 10 
r10?"BÓNUS" 

430 NEXT K 

440 IF U>4 THEN LET U=U~4 


450 

LET B=B+3500 


460 

LET F=F +1 


470 

PRINT RT 107.10?" digite aqui 

11 espaços " 


480 

GOTO 340 


490 

DIM R(20) 


495 

LET Z=0 


300 

LET B=3500 


505 

LET F=3 


510 

LET P=0 


520 

LET U=1 


530 

LET L=0 


540 

LET R=0 


530 

LET X=15 


560 

PRINT RT 378 ? 

"xxxINVRSÜR**x M 

570 

PRINT RT 676 " 

CP-200 PROLOG!C 

R" 



571 

PRINT RT 1071 

?" DIGITE QURLQ 

UER 

TECLfi P/ 

INIClRR 



BOR SORT 

E" 



600 

FOR K=1 TO 20 


610 

PRINT RT K70? 

" "? TRB (31)?" 

620 

NEXT K 


630 

PRINT RT I 7 I? 

" digite 31 deste 


s caracteres "?RT 20rl?" digite 
31 destes caracteres "RT I 7 I?" d 
igite 31 destes caracteres "?RT 
2071?" digite 31 destes caracteres 


certeiramente, mais pontos fará. O In¬ 
vasor só pode tomar sua base três vezes. 
A cada invasão um foguete seu será per¬ 
dido. Fazendo 3.500 pontos, serão ga¬ 
nhos bônus e mais um foguete. 

Os comandos para o jogo são os se¬ 
guintes: “8” movimenta seu foguete pa¬ 
ra a direita; “5”, para a esquerda; “0” 
você atira; e “1“ inicia o jogo. Boa 
sorte!” Ref. P214 


Modelo: CP 200 
16K RAM 
Basic Residente 


640 IF INKEY$="" THEN GOTO 630 
650 FOR K=1 TO 20 
660 SCROLL 

670 PRINT TRB (RND*32>?"*" 

680 SCROLL 

690 PRINT TRB (RND*32)?"." 

700 SCROLL 

710 PRINT TRB (RNI)*32) ? " + " 

720 NEXT K 
730 SCROLL 

740 PRINT " digite aqui 32 destes 
caracteres " 

750 SCROLL 

760 PRINT " digite aqui 32 destes 
caracteres " 

770 SCROLL 

780 PRINT " digite aqui 32 destes 
caracteres " 

790 GOSUB 880 

800 J.F Z*1 THEN PRINT RT L 7 H--I?" 

810 FOR 1=1 TO 20 

820 LET R<I)=INT <RND*3)-1 

830 LET X=X+(INKEY*="S" RND X<26) 

- <INKEY$="5" RND X>3> 

840 PRINT RT I 97 X?"- I 
850 NEXT I 

860 LET C=INT (RND*20)+6 
870 GOTO 40 

880 PRINT RT 2l72?P?" PONTOS"?TRB 
21?F?" FOGUETES" 

890 RETURN 
895 GOSUB 880 

900 PRINT RT 10710?" GRME OVER "?R 
T 10710?"GRME OVER" 

901 PRINT RT 12,4?"NOVR PRRTIDR Dl 
GI TE ••••I"».- 

910 IF INKEY$<>"I" THEN GOTO 900 
920 CLS 
930 RUN 
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Para que futuro você está 
educando seu filho? 




Os dois usam computador. 


j j ssim como toda educação 

BB MB emana de alguma imagem do 

H futuro, toda educação emana 
^ÊB^Ê ulguma imagem do futuro." 

M H (Alvin Tofller ) 

O CP 200 da Prológica é simples de operar, 
custa menos do que um tv a cores e faz 
importantes trabalhos de interesse de toda a 
família. Com ele você e seus filhos aprendem a 
linguagem "Basic" e ficam aptos a programar 
qualquer tipo de computador, participando e 
criando o momento atual que já é chamado de 
"a era da informática". 

Basta ligar o CP 200 a um televisor e a um 
gravador para você ter um computador 
completo em sua casa. 

Assim como o extrato de tomate, o 
liquidificador, o durex, o automóvel, a máquina 
de escrever e a calculadora, o CP 200 vai 
simplificar sua vida. 


E vai dar mais tempo para você e sua família 
criarem um futuro melhor. 


Veja o que você faz com o CP 200: 

• Aprendizado em linguagem Basic 

• Divertidos jogos e passatempos eletrônicos 

• Orçamento doméstico 

• Controle de conta bancária 

• Aulas de matemática e física 

• Gráficos e cálculos científicos 

■■■ PROLOGICA 

microcomputadores 


Av. E ng° Luiz Carlos Berrini. 1168 - SP 


TTJ 




SOLICITE DEMONSTRAÇÃO NOS PRINCIPAIS MAGAZINES. 


AL - Maceió - 221-4851 - AM - Manaus - 234-1045 - BA - Salvador - 247-8951 - 235-4184 - CE - Fortaleza - 226-0871 - 231-1295 - 226-4922 - DF - Brasília - 226-1523 - 273-2128 - 
'225-4534 - 226-4327 - 242-6344 - ES - Vitória - 229-1387 - 222-581 1 GO Goiânia - 224-7098 - 225-8598 - 224-4657 - MA - São Luís - 222-6696 - MT - Cuiabá - 321-2307 - MS - 
Campo Grande - 383-1277 - D ourados - 421-1052 - MG - Belo Horizonte - 201-7555 - 226-6336 - 225-3305 - 222-3196 - 227-0881 - B etim - 531-3806 - Cel Fabriciano - 841-3400 - Juiz de 
F ora - 212-9075 - Uberlândia - 235-1099 - 235-6600 - Viçosa - 891-2445 - PA - Belém - 228001 1 PB João Pessoa - 221-8232 - 221-6743 - PR - Curitiba - 224-5616 - 243-1731 - 
224-3422 - 223-2323 - 232-2793 - Ponta Grossa - 240057 - PE - Recife - 2210142 - 221-5774 - PI - T eresina - 2220186 - RJ - Campos - 22-3714 - R iode Janeiro - 264-5797 - 221-5141 - 
240-1099 - 266-4499 - 253-3395 - 252-2050 - RN - N atai - 222-3212 - RS - Caxias do Sul - 221-3516 - Gravatai - 88-1023 - N ovo Hamburgo - 93-1922 - Porto Alegre - 26-8246 - 
420908 - 27-2255 - 2 1-4 189 - S ta. Maria - 221-7120 - RO - Porto Velho - 221-2656 - SP - A raçatuba - 23-802 1 - Assis - 22-1 797 - 22-2200 - Barretos - 22-64 I 1 - Campinas - 2-4483 - 
32-4145 -J undiaí - 4340222 - M ardia - 33-5099 - Mo^i das Cruzes - 469-6640 - 468-3779 - Mo^i Guaçu - 610256 - Piracicaba - 33-1470 - Presidente Prudente - 22-3165 - Ribeirão Preto - 
625-5924 - 625-5926 - 635-1 195 - São Joaquim da Barra - 728-2472 - São José dos Campos - 23-3752 - 22-73 1 1 - Sõo Jos^ do Rio Preto - 32-2842 - Santos - 33-2230 - Sorocaba - 33-7794 - 
SC - Blumenau - 22-6277 - Campos Novos - 440196 - Criciúma - 33-1436 - Florianópolis - 22-9622 - 22-6757 -1 tajaí- 44-1 524 - J oinvile - 33-7520 - Rio do Sul - 220557 - SE - Aracaju - 224-1310 









NOVO CP 300 PROLÓGICA. 


as: 

CL 



0 pequeno 
grande micra 


Compatível com 
programas em fita 
cassete ou em disco. 


Agora, na hora de escolher entre um Pode ser ligado ao semaparelho de TV, da 

microcomputador pessoal simples, de fácil mesma forma que no terminal de vídeo 
manejo e um sofisticado microcomputador de uma grande empresa, 
profissional, você pode ficar com os dois. Com o CP 300 você pode 

Porque chegou o novo CP 300 Prológica. fazer conexões telefônicas 

0 novo CP 300 tem preço de f P ara cole,a de dados, 

microcomputador pequeno. Mas memória' se utilizar E^ãÍB[| 

de microcomputador grande. de uma 

Ele já nasceu com 64 J9V impressora Ugs^H 
kbytes de memória e ainda dispor de todos 

t< ^ intemacom C os programas existentes 

possibilidade de permite_ para o CP 500 ou o 
%^/k ■+'" expansão de memó- te | C e 0 f g®j C â a ° TRS-80 americano. E o que é melhor: 
$er ria externa para até ’ você estará apto a operar qualquer 

a uma quase 1 megabyte. outro sistema de microcomputador. 

E tem um teclado profissional, Nenhum outro microcomputador pessoal 
que dá ao CP 300 uma versatilidade incrível. na sua faixa tem tantas possibilidades de 
Ele pode ser utilizado com programas de expansão ou desempenho igual, 
fita cassete, da mesma maneira que com CP 300 Prológica. 

programas em disco. jilUiB iü!^ Os outros não m PROLOGI» 

fazem o que ele faz, mícrocomputad 

O único na sua faixa que já pelo preço que ■■■ 

ce com 64 kbytes de memória. G I G CObíB. BB Av Eng 0 Luis Carlos Berrini, 11 


Pode ser ligado 
a um televisor comum 
ou a um sofisticado 
terminal de vídeo. 


••••' 

229-1387 

Cuiabá - 321-2307 • MS Campo Grande 383-1270 - DoLrados - 421-1052 

• MG-Belo Horizonte - 227-0881 - Betim - 531 -3806 - Cel Fabriciano - 841 -3400 - Juiz 
de Fora - 212-9075 ~ Uberlândia - 235-1099 • PA-Belém - 228-0011 • PR-Cascavel - 23-1538 - Curi- 
tiba - 224-5616 - 224-3422 - Foz do Iguaçu - 73-3734 - Londrina - 23-0065 • PE-Recife - 221-0142 • Pl-Teresina 
222-0186 • RJ-Campos - 22-3714 - Rio de Janeiro - 264-5797 - 253-3395 - 252-2050 • RN-Natal - 222-3212 • RS-Caxias do 
Sul - 221-3516 - Pelotas - 22-9918 - Porto Alegre - 22-4800 - 24-0311 - Santa Rosa - 512-1399 • R0-Porto Velho - 221-2656 • SP Solicite 
Barretos - 22-6411 - Campinas - 2-4483 - Jundiaí - 434-0222 - Marília - 33-5099 - Mogi das Cruzes - 469-6640 - Piracicaba - 33-1470 - Ribeirão demonstração 
Preto - 625-5926 - 635-1195 - São Joaquim da Barra - 728-2472 - São José dos Campos - 22-7311 - 22-4740 - São José do Rio Preto - 32-2842 - Santos - 33-2230 nos principais 
Sorocaba - 33-7794 • SC-Blumenau - 22-6277 - Chapecó - 22-0001 - Criciúma - 33-2604 - Florianópolis - 22-9622 - Joinvile - 33-7520 • SE-Aracajú - 224-1310 magazines. 







GERAÇAO PROLOGICA 



Receba em sua casa 
a revista Geração Prologica 
por 1 ano de novos programas 
e assuntos de seu interesse 



Em anexo estou remetendo 
a importância de Cr$ 2500,00 em 

Cheque n.°. 

c/Banco. 

ou Vale Postal N.°. 

para pagamento da assinatura 
de 6 números de Geração Prológica 

Obs: Não aceitamos Ordem de Pagamento 


Preencher a máquina ou letra de forma 

Nome_ 

Endereço_ 

CEP_Cidade_ 

Estado:_Tel._ 


























ISR-40/3966/83 
UP- CENTRAL 
DR/SÃO PAULO 


CARTA-RESPOSTA COMERCIAL 

NÃO É NECESSÁRIO SELAR 









